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ATTENTION TRS-80 MODEL 100 OWNERS 


AT LAST* 

SOMETHING FOR NOTHING 

(That means absolutely free!) 

WHAT? 


Just call us on the toll free number listed here and we'll 
send you two free programs on a cassette for your TRS 80 
Model 100. They are: 

File Manager: lets you kill, rename, and make files invisible 
at the touch of a function key plus 6 other features. 
Restore: lets you restore lost text files from cold start 
or crashed computer. 

Nifty? You bet! But you're probably wondering why we’re 
doing this? For a very good reason. Keep reading. 

WHY? 

Because we want to put in your hands information on a 
very important new product that you've been waiting for, 
ROM Programs! Ever since you bought your TRS 80 Model 
100 you've heard about programs in ROM. Well, they're 
here, ready to snap in and go! Giving you the power you've 
been waiting for. We believe you'll be so excited about our 
ROM programs that we're willing to give you FREE software 
just to tell you about them. So call today to order your free 
programs. You'll also receive all the details about this 
revolution in Model 100 software. 


1-800-641-4645 Ext. 207 

PORTABLE COMPUTER OORT GROUP 

11035 Harry Hines, Suite 207 
Dallas, Texas 75229 (214) 351-0564 



From Computer Plus to YOU... 

PLUS after PLUS after PLUS 



BIG SAVINGS ON A FULL COMPLEMENT OF RADIO SHACK COMPUTER PRODUCTS 


COMPUTERS 

Model 4 Portable 


64K 2 Drives 

1020 

Pocket Computer 3 

89 

Pocket Computer 4 

59 

Model 2000 2 Drive 

2299 

Model 2000 W/Hard Disk 

3599 

Model 12 64K 1 Drive 

2360 

Model 12 64K 2 Drive 

2950 

Model 16B IDr 256K 

3375 

Model 16B 2Dr 256K 

3965 

MODEMS 


Hayes Smartmodem II 

215 

Hayes Smartmodem 1200 

505 

Novation Smartcat 1200 

410 

Novation J-Cat 

115 

AC-3 

125 

DC Modem 1 

89 

DC Modem II 

160 

DC Modem 2212 

315 


PRINTERS 


Silver Reed EXP400 D.W. 

309 

Silver Reed EXP550 D.W. 

430 

DWP410 

1159 

Gemini Powertype 

345 

CGP115 

159 

CGP220 Ink Jet 

545 

DMP110 

305 

DMP420 

735 

Toshiba 1340 (24 wire head) 

779 

Gemini 10X 

289 

Gemini 15X 

409 

Panasonic P1091 

315 

Smith Corona Fastext 

190 

Prowriter 8510 

345 

Okidata 

CALL 

Epson 

CALL 

DISK DRIVES 


Model 111/4 Drive 0 

450 

Model 111/4 Drive 1 

195 


Model 111/4 Drive 2 259 

Model 111/4 Drive 3 220 

Hard Disk M2000 1525 

ETC. 

CCR-81 Recorder 52 

Cassette Tapes (10 Pk) 9.95 

16K Ram Chips 25 

64K Ram Chips 62.95 

Model 4 64K Upgrade Kit 79.95 

Ml00 Bar Code Reader 89 

64K Printer Buffer 199 

Printer Stand 25 

Printer Cables 
Printer Ribbons 
Printer Paper 
Computer Books 


Radio Shack software 10% off. 

Send for complete listing of 
brand name software and hardware. 


CALL TOLL FREE 
1 - 800 - 343-8124 

• LOWEST POSSIBLE PRICES 

• BEST POSSIBLE WARRANTY 

• KNOWLEDGEABLE SALES STAFF 

• TIMELY DELIVERY 

• SHOPPING CONVENIENCE 


com 



P.O. Box 1094 
480 King Street 
Littleton, MA 01460 


SINCE 1973 




IN MASSACHUSETTS CALL (617) 486-3193 


TRS-80 is a registered trademark of Tandy Corp. 
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Lprint 


New Software Has 
‘Quality Of Excitement’ 


T here is some real excitement 
around the PCM offices these 
days. And that excitement means 
some good things for you, too. 

It seems like almost every day brings 
another piece of quality software for us 
to review and about which we can 
report to you. Most of this is for the 
Tandy 2000 — but we are seeing some 
top-flight programs for the Portable 
Computer, too. Naturally, in the com¬ 
ing months, you will see formal reviews 
on much of this software, in an effort to 
guide you in purchasing what you may 
need. 

As we have said practically every time 
we have had the opportunity, we see the 
2000 and the Portable Computer as 
being part of a “team.” You can use the 
Portable while you are “on the road,”(is 
that why we have a column by that 
name?) and then download information 
and the like to your 2000 when you 
reach home base. We think this offers 
the most flexible, least expensive and 
most powerful computing system avail¬ 
able anywhere. 

But what is really getting us excited is 
the quality of software that is becoming 
available for the 2000. And, because 
almost every bit of it allows for the 
transfer of files in and out, it should be a 
simple procedure to use the information 
- while, perhaps, not the programs 
themselves — in your Tandy “system.” 

1 have been spending quite a bit of 
time with SPl’s Open Access in the last 
couple of days. (You will find my review 
of this excellent software package in our 
reviews section in this issue.) And, the 
day after Open Access appeared, a little 
gem called Lotus 1-2-3 made its pres¬ 


ence known. Then, two days later, in 
walked Sorcim’s SuperCalc 5, followed 
by Condor’s Condor 3. We’ve also seen 
Data Ace , Telexpress’ Teleterm , Mi¬ 
croPro’s Professional and a host of oth¬ 
ers. Some of these programs are availa¬ 
ble direct from Radio Shack, others 
available through the Express Order 
Software program. 

Having looked at 1-2-3 for a bit on 
am IBM PC, we took a quick tour on 
the 2000. What a difference! Just goes to 
show what can be done with a really 
top-flight computer like the 2000. The 
speed is much better, there are more 
colors and the colors are more vivid. If 
you know anyone with a PC, set up your 
2000 beside it, and both of you run 1-2- 
3. There is no comparison! Which 
means, of course, there is no compari¬ 
son between computers, either. But 
we’ve known that all along, right? 

All this means you’ll be seeing more 
information and more reviews in the 
coming issues of PCM, as well as more 
information about other aspects of your 
2000 and Portable Computer. And, of 
course, we will continue to offer you 
original programs to perform a variety 
of tasks as well as fun things with both 
computers. 

Yes, both the Portable Computer and 
2000 markets continue to expand. You 
can help us by mentioning PCM when 
you buy or inquire about products — 
either direct from the manufacturer or 
through Radio Shack. 

The fact that you see increases in 
advertising means that some of you are 
already helping us help you. Thanks for 
your support! 

— Lonnie Falk 
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Letters 



BEHIND BARS 

Editor: 

I have a problem with my bar code opera¬ 
tion and wonder if others have experienced 
the same. 

Specifically, wherever the program shows 
a V’ (either decimal or period), the bar code 
reader prints an “!”. Further, where a pro¬ 
gram calls for the letter ‘Z\ the bar code 
reader prints a 

For example, in Line 3060 of Baread 
(“Revised Reader,” Page 26 PCM May ’84) 
should read 3060 PRINT@280+ (20-.5*LEN 
)),ER$; but the reader prints (20- !5*LEN’’ 
etc. In Square (“Square Deal,” Page 23 PCM 
June ’84), Line 100 should be 100 DEFINT 
A-Z: But the reader prints DEFINT A- : 
and in Lines 615 and 625 it should be :Z=1: 
and :Z=0:, but the bareader reads it as 
and :-=0:. 

I have carefully checked the Baread listing 
on Page 18, PCM April ’84, against that 
entered in my Model 100 and there are no 
differences. I mention this because it is the 
program I used to enter the modified Baread 
from the May issue of PCM. 

I suspect the problem is in the B3OF9.C0, 
but since this is a machine program I don’t 
know how to check it. 

Can you offer any suggestion? 

K. W. Klages 
Orlando, FL 

Editor ’s Note: You 're absolutely right! 

The problem is not with the BAREAD 
.BA reader program, but rather with 
the program that we use to print the 
code. The problem has been corrected 
and l have been sentenced to life 
“behind bars "by a jury of my peers on 
the PCM editorial staff 


BCR INTERFACE 

Editor: 

I am the proud owner of a new M 100 and 
spend a great deal of time with this machine. 
1 am interested in interfacing the BCR 
socket to some electronic projects but have 
been unable to find any information on how 
the M100 inputs information through it. 
Can you help me? I am also anxious to see 
more articles on machine language program¬ 
ming in your magazine. 

Martin Childs 
Deep River, Ontario 

Editor’s Note: The 100’s BCR port is 
designed to match the Hewlett-Packard 
bar code wand sold by Radio Shack 
and Bi- Tech; it s not well-suited to 
other applications. 


AN EVIL GENIUS, MAYBE 

Editor: 

I recently bought a Disk/Video Interface 
for my Portable Computer. The computer is 
wonderful. The operating system is easy for 
me to use since I was already familiar with 
the bulk of it through the M 100’s operating 
system and the disk system is perfect for me 
in my job as a law clerk and as a student at 
the University of Kentucky. There is only 
one small problem in this whole scenario: 
the plug at the computer end of the D/Vl 
cable. To say that the plug is not “user 
friendly” would not be doing it justice. It can 
only be attributed to some evil genius some¬ 
where in the depths of Tandy or perhaps in 
Japan. Why such a plug was put on a porta¬ 
ble computer of this type is beyond me, and 
it falls to me only to suffer with it or try to 
change it. Not being the martyr type, I would 
like to change it. 

I have consulted preliminarily with some 
of my friends in the electrical engineering 
field and they are of the opinion that perhaps 
an easier plug could be spliced into the cable 
at a point near the computer, in effect mak¬ 
ing another connector just under the RS- 
232C port. My question to you is whether 
there is another cable or plug available to 
connect the M 100 to the D/VI or, if not, is it 
possible to have a technician safely splice 
another, simpler connection into the line 
somewhere? 

Any information on this problem would 
be greatly appreciated. 

Matthew L. Mooney 
Lexington, KY 

Editor’s Note: The only 40-pin con¬ 
nector we know of would be a pair of 
standard 40-pin edge connectors (0.1- 
inch pin spacing) and a t wo-sided card 
edge to mate the two; you would cut 
the cable about an inch from the back 
of the computer and put one of the 
connectors on each side, then insert 
the card edge in one and mate the tw'o 
connectors. Check with an electronic 
parts distributor. 


DOS IT RUN ON 2000? 

Editor: 

I have some software provided by an insu¬ 
rance company I represent and they had it 
programmed in PC-DOS, instead of MS- 
DOS. I would like to know if anyone pro¬ 
duces add-on boards or whatever it would 
take to enable PC-DOS to run on the Tandy 
2000 ? 

I really like the 2000 and don’t want to get 
rid of it for an IBM clone. I sure don’t like 
the way they work as well as the 2000. 

Charles LeBlanc 
Brazoria, TX 

Editor’s Note: There is really no need 
for an add-on board for the Tandy 
2000 to allow it to run PC-DOS. PC- 
DOS is what IBM calls its version of 


MS-DOS. There are very few differ¬ 
ences between IBM’s PC-DOS and 
MS-DOS — most of which do not 
directly affect program compatibility. 
Most PC-DOS programs heed only 
be transferred to a Tandy 2000 MS- 
DOS disk in order to run. This is a 
simple process since the 2000 can read 
from and write to PC-DOS disks. A 
few programs that directly access IBM 
PC hardw are, or make extensive use 
of IBM graphics, will have to be 
revised for the 2000. The best way to 
find out if your package will work on 
the 2000 is to give it a try. Just copy it 
(using the MS-DOS COP Ycommand) 
to a backup of the MS-DOS disk that 
came with your computer. 


TWO FOR THE COMMENTS 

Editor: 

I would like to thank you and your writing 
staff for an informative Model 100 maga¬ 
zine. I follow PCM with the same enthusiasm 
as your sister publication rainbow (which 
nicely complements my CoCo). 

I wanted to comment on a few changes 
occurring in pcm which I’d like to hear from 
other readers: 

1) The bar code reader programs are just 
fantastic. 1 picked up a Radio Shack bar 
code reader at the Dayton amateur radio 
convention and it has already paid for itself 
in the time saved on typing in programs. 
Keep up the good work. 

2) I’m a little disappointed in seeing pcm 
pick up the Tandy 2000 computer for inclu¬ 
sion in the magazine. 1 won’t tell you your 
business, but I think your magazine can 
exclusively support the breed of portable 
computers out now and the second genera¬ 
tion that will come from Tandy, NEC, etc. 
You mentioned in your editorial that the 
M 100 and the Tandy 2000 are natural part¬ 
ners. Well, it’s hard for me to see how much 
more “natural” the 2000 is, as compared to 
the IBM PC, Apple, or in that case the CoCo 
(I am able to upload and download into my 
CoCo disk system as easy as any other sys¬ 
tem). Maybe what needs to be done is to take 
a reader survey and find out what “other” 
computers are being used (if any). I’ll bet 
you’ll find the hobbiests with CoCos, Com¬ 
modore 64s, Apples, etc. and the business 
users with IBM PCs and clones (just step in 
any iarge company office and see how many 
PCs and Apples are in use). 

The M 100 is really a true stand-alone unit 
that offers tremendous utility with any other 
computer. Please don’t dilute your fine 
magazine with the Tandy 2000. If you really 
think it will succeed (I have my doubts), do 
what you were maybe planning — start a 
dedicated Tandy 2000 magazine. 

Let’s have some reader input on this sub¬ 
ject. Thanks again for a nice publication. 

Bob Gobrick 
Lakewood, CO 
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Ask your dealer for the Porta™ series 
from Skyline—to help you work faster and better! 

PortaCalc™ — Model 100 “electronic spreadsheet” with 14 column by 26 row workspace! 
Full use of the built-in function keys to save, load, screen print, report print, or to look 
behind the data at the formulas in use. Q3J3 

Full arithmetic operators including exponentiation, absolute value, integer, summation, 
and averaging. Calculations are done to 14 digits of precision and displayed up to 9 
digits. User selectable decimal place from none through seven—not just one, two, or 
floating! Formula replication is included to allow fast creation of worksheets. 

Worksheets may be saved, loaded, or merged using the computer’s memory or 
cassette. Often used templates can be saved in memory for instant recall. 

Two powerful utility programs are included with PortaCalc at no extra 
charge! PortaDex'™ is a data exchange program that allows reformatting 
PortaCalc files into the DIF format used by VisiCalc. PortaPrint™ is an 
enhancement to the Model 100’s text editor, adding the ability to adjust 
left, right, and top margins, and page length. Page numbering, headers, 
centered lines, flush right justification, new page control, and more. 

Comes with extensive documentation in padded 3-ring binder. Includes 
tutorial, detailed reference section, and executive level sample templates. 

Fully illustrated with screen prints, examples, and hints. 

PortaStat'™ — Correlation, regression analysis, and descriptive statistics 
package, designed to be a working tool for today’s businessman. 

Data can be input from cassette, memory, or keyboard. Interactive with 
PortaCalc data files! Thoroughly documented, includes tutorial. 

PortaFin'™ —Present value, net present value, future value, annuities, 
interest factors, loan constants, internal rate of return and more! This user- 
friendly package prompts you for the needed input data, then gives you 
the answer to your loan or investment problem! Interactive with PortaCalc 
files, allowing you to “read” cash flow data from memory. Keyboard or 
cassette input also available. 

PortaMax' M — The powerful ‘simplex’ method of linear programming. Find 
the optimum ‘mix’ for a given set of constraints. Interacts with PortaCalc 
files to avoid time-wasting repetitive data entry. Tutorial, examples, and 
bibliography included. 

PortaFolio™ — Stock and bond valuation, betas, Macaulay’s duration, yield 
to maturity, bond swap calculations, and much more. All in an easy to use 
program, interactive with PortaCalc data files. Supplied with comprehensive 
instructions and reference manual. 


All Porta series programs are supplied on cassette and require 24K RAM. 
Pricing — PortaCalc is $69.95, all others are $44.95 each. 

If ordering direct, add $2.00 shipping and handling per order. 

Dealer inquires invited. 



4510 W. Irving Park Rd. • Chicago, IL 60641 • (312) 286-0762 


PortaCalc 













Basic Bytes 

Dealing With 
Basic String 
Functions 


By Richard A. White 
PCM Contributing Editor 


(Richard White has a long background 
with microcomputers and specializes in 
BASIC programming. With Don Dollberg, 
he is the author of the TIMS database 
management program.) 


W e think of computing as deal¬ 
ing with numbers for the most 
part. There are some program¬ 
ming languages whose reason to be is to 
deal with numbers. While dealing with 
numbers is important, dealing with 
characters and words has become a 
major task for modern computers. 
Word processing and database man¬ 
agement, including mailing list data, 
client listings, employee information 
listings and inventory work depend on 
computerized handling of strings. 

A string is a series of characters. 
Characters are anything not treated as a 
number. Letters, numerals, punctuation, 
control characters such as carriage re¬ 
turn and back space and graphics char¬ 
acters are all just characters and are 
treated in the same way by BASIC. A 
string of characters does not have to 
make sense to still be a character string. 

Characters can be entered into the 
computer in a number of ways. We will 
concentrate on program and keyboard 
entry, leaving data entry from cassette 
or disk to other columns. Strings may 
be part of a program. Here are two 
examples: 

10 S$=“DEMONSTRATION” 

20 PRINPTHIS IS A ”S$ 

In Line 10, the string “DEMONSTRA¬ 
TION” is assigned to the string variable 
S$. As we have said before, S$ does not 


equal the string. It represents the string 
and allows the computer to find the 
string. Once BASIC runs Line 10 it 
knows where S$ string is and can use it 
anywhere in the program. There is also 
a string in Line 20, “TH IS IS A ”, that is 
not assigned to a variable. This is a 
string that BASIC uses when it comes to 
it in Line 20 and nowhere else. Note that 
BASIC also uses S$ in Line 20 to print 
THIS IS A DEMONSTRATION. 

Strings can also be put in a program 
in DATA statements. In this case, the 
DATA must be read into string varia¬ 
bles before it can be used. 

10 FOR X=1 TO 4 : READ S$(X): 

S$(X)=S$(X)+“ ”:NEXT 

20 FOR X=1 TO 4: PRINT S$(X);): 

NEXT 

30 END 

1000 DATA THIS, IS, A, 
DEMONSTRATION 

A FOR . . . TO . . . NEXT loop reads 
the DATA into S$(X) string variables. 
We then add a space to each string. A 
FOR . . . TO . . . NEXT loop is used to 
print the strings and we get the same 
THIS IS A DEMONSTRATION print¬ 
out we had before. Note that the pro¬ 
gram never reached Line 1000, but 
found the DATA and printed it all the 
same. BASIC is set up to find the DATA 
wherever it is put in the program. The 
obvious place for DATA statements is 
at the very end of the program where 
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BASIC can find the information, but 
does not waste time running over DAT A 
lines. 

1 prefer to define strings at the end of 
a program, send the program over these 
lines once and have them available from 
then on. Here is an example: 

5 GOSUB2000 : ... 

2000 S1$=“MESSAGE 1” : S2$= 

“MESSAGE 2”: S3$=“MESSAGE 

3”: RETURN 

INPUT AS, LINEINPUT ASand I$= 
INKEYS all seek a keyboard input that 
is put into a string. INPUT AS accepts 
characters from the keyboard until it 
sees a carriage return (ENTER), quote, 
comma, or semicolon. This is good 
news and bad news. The good news is 
that you can enter a number of strings 
with one INPUT statement. The bad 
news is the obvious limit on what the 
string you enter can contain. INPUT 
also lets you print a string to the screen 
telling the operator what to enter. 

100 INPUT“ENTER YOUR NAME 

AND TELEPHONE NUMBER”; 

NA$,TL$ 

LINEINPUT AS allows entry of any 
keyboard character except the carriage 


return (ENTER) which terminates the 
string. It allows only one string to be 
entered at a time and does not support 
printing a string after the keywords. The 
equivalent of the above INPUT code 
follows. 

100 PRINT“ENTER YOUR NAME 

AND TELEPHONE NUMBER” : 

LINEINPUT NAS : LINEINPUT 

TLS 

The big value of LINEINPUT is in 
wordprocessing and database manage¬ 
ment programming where all keyboard 
characters need to be entered into 
strings. 

In the ideal program, all operator 
choices will be entered as single keys¬ 
trokes. Why enter a character and an 
ENTER when we can do the same thing 
with one keystroke. INKEYS is our 
hero. 

20 I$=1NKEY$ : IF I$=“”THEN 20 

ELSE RETURN 

This subroutine is a real workhorse. Put 
it early in the program so BASIC can get 
to it in a hurry. You can then call it from 
various places in the program. 

Once the character or string is entered, 
it is processed or used in some way. 


BASIC includes a variety of powerful 
processing facilities. Strings can be 
combined or added to each other in a 
process called concatenation. 

5 GOSUB 2000 

100 A$ = B$ + C$ + D$ : PRINT A$: 

END 

2000 B$=“THIS ”: C$=“DEMOS ”: 

D$=“CONCATENATION.”: 

RETURN 

Here three strings were added to form a 
new one A$ which was then printed. 
This becomes a powerful tool when you 
need to make a string that includes 
characters not available from the key¬ 
board. There is no other way to make a 
string in a program that contains a 
quote than to add it to a string CHR$ 
(34). How would you write BASIC that 
prints the following line exactly as shown 
onto the screen? 

10 A$ = “TEST STRING” 

First try might be: 

10 PRINT “10 A$ = “TEST 

STRING”” 

But, that won’t work since BASIC will 
read the second quotation mark as the 
end of a string. It will think that TEST 
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STRING is a variable, which has not 
been evaluated, of course, and print a 
zero. The final “” is thought of as a null 
string, a string with nothing in it, which 
prints nothing. If you run Line 10 you 
get: 

10 A$=0 

The ASCII value of the quotation mark 
is 34. Let’s rewrite Line 10 to tell the 
program to print CHR$(34), the char¬ 
acter whose ASCII value is 34 whenever 
we need to print a quotation mark. We 
will put the whole thing into a new 
string so we can easily print it any time 
we need. 

5 Al$ = “10 A$= ” + CHR$(34) + 

“TEST STRING” + CHR$(34) 

10 PRINT Al$ 

This will do the job. Key it into your 
M 100 and prove it to yourself. 

What your Model 100 can put to¬ 
gether, your Model 100 can take apart. 
Taking strings apart, or getting pieces of 
strings, is fully as important as putting 
strings together. M100 BASIC offers 
three functions that return a part of a 
string. 

L$ = LEFTS (AS,NUMBER) 

MS = MIDS (AS,POSITION, 
NUMBER) 

R$ = RIGHTS (AS, NUMBER) 

In all cases, AS is the string we need to 
get something from or take apart. 
NUMBER is simply the number of 
characters from the left end of AS that 
need to be put into L$. AS remains 
unchanged, and the characters in ques¬ 
tion are in both AS and in LS. When 
RIGHTS is used it works the same way 
except it counts back from the right end 
of AS to determine which characters to 
get. 

LS = LEFTS (“JULY, 1984”, 4) 

LS will return “JULY” 

R$ = RIGHTS (“JULY, 1984”, 4) 

R$ will return “1984” 

MIDS is more general, and more 
powerful, but has only one more pa¬ 
rameter, the starting position in the 
string, POSITION to remember. PO¬ 
SITION is the number of characters 
from the left end of the string where 
BASIC is to start getting characters. 
NUMBER is the length of the string to 
get and put into MS. Did you happen to 
think that we can throw LEFTS and 
RIGHTS away and use MIDS for all 
string disassembly? The substitution for 
LEFTS is simply to use 1 for position. 

LS = MIDS (AS, 1, NUMBER) 


This will work exactly like LEFTS 
above. 

L$ = MIDS (“JULY, 1984”, 1,4) 

LS will return “JULY” 

To substitute MIDS for RIGHTS, we 
need to know how long AS is and sub¬ 
tract NUMBER from that length plus 1 
to get the starting position. 

100 L = LEN(AS): R$ = MID$(A$, 
L+l-NUMBER, NUMBER) 

Let’s reason it through. 

AS = “JULY, 1984) 

L = LEN(AS) L will return 10 

NUMBER = 4 

R$ = M1D$(A$, 10+1-4,4) 

R$ will return “1984” 

Looks simple, doesn’t it? Well, it is and 
it isn't. The problem is not in knowing 
how to use LEFTS, RIGHTS and MIDS. 
The problem comes when you need to 
write the program to calculate POSI¬ 
TION and NUMBER. This depends on 
the logic of the program you are writing. 
String handling functions are basically 
simple. It’s how they are used that gets 
complicated. 

A powerful help is 1NSTR. Its syntax 
is: 

N = 1NSTR(NUMBER, SEARCH 
STRING, TARGET STRING). 

SEARCH STRING is the string to be 
searched. Within that string we hope to 
find the shorter TARGET STRING.” 
We will start at character position 
NUMBER, counted from left to right. 
If we get a match, N will carry the 
number of characters from the left that 
the TARGET STRING starts. If the 
TARGET STRING is not found, N = 0. 

First, this is a powerful comparison 
utility. Say you had an inventory file 
and you wanted to find WIG1TS, LH. 
Let’s assume that names of things were 
in the NA$() array. If we can find the 
array member number for W1GITS, 
LH, then we can access the data relating 
to WIGITS, LH that would be in other 
arrays. 

200 PRINT“PART NAME”: 
LINE1NPUT PN$ 

210 FOR X = 1 TO LT : N=INSTR 
(l,NA$(x),PN$) 

220 IFN-0 THEN NEXT ELSE 
PRINTNA(X) “ ”1V(X)“ ”CO(X) 

“ ”PR(X) 

Here LT is the number of entries in 
the inventory file. The user would type 
in W1GIT, LH. Since this contains a 
comma, we must PRINT the prompt 


and use LINEINPUT. Now l would 
expect only one NA$() to contain 
WIGIT, LH, so N =0 until the record is 
found. Then N will probably return 1 
since we expect the name to start in the 
first position in the variable, but it does 
not have to. Anyway, N will be greater 
than zero, routing the program to the 
print statement after the ELSE. In the 
example this material printed, would 
be: name, NA$(), amount in inventory, 

I V(), cost of each CO(X), and the selling 
price, PR(X). 

There are a variety of other uses for 
INSTR. I have used it to make a phrase 
substitution editor, for one. Another 
powerful use is as part of a program 
control strategy. Say, for instance, you 
have a menu where choices can be 
entered as single letters. 

dARK BEER 
11GHT BEER 
pLAIN PIZZA 
hOT DOG 
cOLA 

KEY FIRST LETTER OFCHOICE 

Only in Prospect, Ky., does an Eatery 
with such a limited choice stand to sur¬ 
vive. The allowed entries will be one of 
five letters, but could be upper or lower¬ 
case so there are really 10 options. Sort¬ 
ing these out with IF . . . THEN . . . 
ELSE statements would be a drag and 
eat memory to boot. Let’s use INSTR. 

100 CLS:PRINT“ dARK BEER”: 
PR1NT“ 1IGHT BEER”: PRINT 
“ pLAIN PIZZA”: PRINT“hOT 
DOG”: PRINT“ cOLA”: PRINT: 
PRINT“ KEY FIRST LETTER OF 
CHOICE” 

110 N = INSTR(l,“dDlLpPhHcC”, 

I$j: 

115 GOSUB20: ON N GOTO 150, 

150,200,200,250,250,300,300, 

350,350 
120 GOTO 100 

Line 100 prints the menu choices. In 
Line 110, we call the INKEYS in Line 
20. Then INSTR hunts through the 
SEARCH STRING for a match for the 
character in 1$ and returns a number 
from one to 10 if there is a match. In 
Line 15 view the ON N GOTO as count¬ 
ing across its list of line numbers to the 
Nth one and going to that line. If no 
match is found, the program falls 
through to 120 and goes back to 100 to 
try again. 

The final function to mention this 
month is STR$(). Its syntax is A$ = 
STR$(X). It just converts the number in 
X to a string that has a leading space. 

1 I 
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While many might envision the coding 
and decoding of messages as indulging 
in a fantasy world of spies and inter¬ 
national intrigue, it is, in fact, a prac¬ 
tical method of maintaining file secur¬ 
ity during data communication, as 
well as being a means of keeping sensi¬ 
tive RA Mfiles private. 


(Ken Guscott is an engineer engaged in 
the design of electronic and optical 
instruments . He holds a bachelor's de¬ 
gree in electrical engineering and designs 
software primarily for engineering and 
m a them at ics app Itea t i o ns.) 


I suppose that everyone has a little 
James Bond in them, and has at 
some time or another fooled around 
with codes and ciphers. When I was in 
high school some of us used to corres¬ 
pond with coded messages based on a 
letter substitution method. 

It was great fun and had an air of 
mystery about it, although all of our 
codes were quite simple to break. It was 
about that time, that l first discovered 
the “Alphabet Cipher" which was in- 
vented by the Reverend Charles Lut- 
widge Dodgson, a mathematical lec¬ 
turer of Christ Church College in Eng¬ 
land. “Who's he?" you ask. Well, his 
pen name was Lewis Carroll and he 
w rote Alice In Wonderland and a lot of 
other things including books on sym¬ 
bolic logic. Now here w r as a great code, 
and one extremely difficult to break 
because it is based on a “Key" which is 
known only to the correspondents. This 
method has been used by spies through 
generations and has been featured in 
many spy novels and movies. In these 
stories the spies usually had copies of 
the same innocent looking paperback 
book which was used as the key text for 
encoding and decoding vital messages. 

Well, now we can take our innocent 
looking Model 100 and turn it into the 


fabulous “Lecturn" cryptograph ma¬ 
chine which gave James Bond so much 
trouble in “From Russia With Love." 
With any luck a beautiful spy will come 
out of the woodwork and our adven¬ 
tures will begin. We will develop a pow¬ 
erful cipher program which, at the same 
time, will demonstrate how to use the 
files protocol in the Model 100 interac¬ 
tively. This is a most useful concept for 
many program applications. 

First, let us review how the book code 
works. Figure I shows a matrix of 
alphabets which is used to encode and 
decode the message. Let us suppose that 
our KEY text is “MARY HAD A LIT¬ 
TLE LAM B."The program repeats it as 
many times as necessary to encode the 
message. Now r let us suppose our mes¬ 
sage is “MEET ME BEHIND THE 
BARN AT MIDNIGHT AND WE 
WILL WATCH THE MOON TO¬ 
GETHER." This will be encoded as 
follows. 

MARY HA DAL1TT LEL AMBM 
AR YHADALIT TLE LA MBMA 
RYHAD AL1 TTLE LAMBMARY 
MEET ME BEHIND THE BARN 
AT MIDNIGHT AND WE WILL 
WATCH THE MOON TOG ETHER 
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FIGURE 1 — Alphabet Cipher 
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Read the key text into the top horiz¬ 
ontal row of Figure 1. The first letter is 
‘M,’ so go into column M. The first 
letter of the message is also M so go to 
row M. The letter at the intersection is 
the first letter of the encoded message. 
Keep doing this and the encoded mes¬ 
sage will read: 

ZFWS UF FFTRHX FMQ CNTA 
BL LQERJSQN UQI IF JKYM 
OZBDL UTN G1AS FPTGG1WQ 

Of course, any worthwhile spy would 
probably try to make this even harder to 
crack by sending the message as: 

ZFWSUFFFTRHXFMQCNTABL 

LQERJSQNUQ11FJKYMOZBDL 

UTNG1ASFPTGG1WQ 

This way we don’t even know how 
many words there are or how many let¬ 
ters the words have. To decode the mes¬ 
sage the table is used backwards, so to 
speak. Go to the column of the letters of 
the key text in turn as before, and look 
down the columns until you see the cor¬ 
responding letter in the encoded text. 
Look to the left column of that row to 
get the decoded letter. 

Well, that’s how it works, and you 
can see that it would be quite tedious to 
do this manually from the table as spies 
in the old days did. If you think about 
the operation of the code and attach a 
number to each letter, so that A = 1, B = 
2, etc., then all that the table does when 
encoding is to add two letters together 
and so come up with a new letter. For 
example, A + A is 1 + 1 = 2 which is B. If 
the sum is higher than 26, then 26 must 
be subtracted from that number. For 
example, P + Q is 16+ 17 = 33,33-26 = 
7 and 7 is G. This gives us a clue on 
designing a suitable algorithm for Lewis 
Carroll’s code. It will be something like 
this: 

ENCODE 

Get the first characters from Key and 
Message 

Convert letters to numbers 
Code = Message + Key 
If answer is greater than 26, subtract 
26 

Convert code number to code letter 
Get the next pair of characters 

DECODE 

Get the first characters from Key and 
Code 

Convert letters to numbers 
Message = Code - Key 
If answer is less than 1, add 26 
Convert message number to message 
letter 

Get the next pair of characters 


Fortunately, this task is very easy for 
our computer, so we can greatly improve 
on the method. In the discussion above 
we are only using the 26 letters of the 
alphabet. With the computer we can 
expand the table to employ both upper- 
and lowercase alphabets, the numbers 
and even all of the punctuation and 
symbols that are at our disposal. In the 
example given above, after decoding we 
would have to figure out the message 
and put in the necessary spaces and 
punctuation. This could lead to some 
ambiguities in real life, I’m sure. In the 
case of the computer we can encode 
everything, including spaces and punc¬ 
tuation and the code will be a continu¬ 
ous flow of symbols. In the computer all 
of our alphabets and symbols already 
have numbers assigned to them and 
these are, of course, the ASCII code. It 
is a very simple matter to write a pro¬ 
gram to encode and decode our mes¬ 
sages for us using these numbers. 

How hard is this cipher to crack? 
Nearly impossible. Consider the method 
of encryption, two disassociated char¬ 
acters are added together to get a sum. 
Without knowledge of the key there is 
no way that the coded text means any¬ 
thing, or has any pattern to it. It is sim¬ 
ilar to getting the result of an arithmetic 
addition. If you are given that the sum 
of two numbers is 10, for instance, the 
only thing you can say is that the origi¬ 
nal two numbers could be 9 + 1,8 + 2, 7 


+ 3, 6 + 4, or 5 + 5, assuming they were 
integers. In the case of our cipher we are 
given the equivalent that the sum of two 
numbers lies between 32 and 122. It 
would require a lot of computer aided 
substitution to decode it, because there 
is no discernible pattern. You might get 
somewhere if you knew that the key was 
a repeating group of letters, but in our 
case we can make the key a 300-page 
novel and never use the same passage 
twice. If our message had 100 characters 
in it we would have to make 90 to the 
power 100 substitutions to get all com¬ 
binations. 

If we could make a million substitu¬ 
tions per second in one year this would 
only yield 3.1536E13, and at this rate it 
would take quite a few lifetimes. You 
may ask “If it’s so good and so simple, 
why isn’t it used by government and 
commercial interests?” How do you 
know it isn’t? Seriously, though, the 
problem is in the portability of the key. 
It’s okay for a few individuals to use, but 
how would you issue and update the key 
throughout an army, for instance, and 
make sure that everyone knew what 
passages of text to use today? How 
would you ensure the key did not fall 
into enemy hands? Once it did, comput¬ 
er substitution becomes relatively easy. 
Just start at the beginning of the book 
and decode, then move one character, 
do it again, and so on. If the book has 
200,000 characters, that’s just 200,000 
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FIGURE 2 — Program Architecture 



tries. Once you had entered the key text, 
you could decode quite quickly. Of 
course, it would take a big mainframe to 
do it and it would have to have a pro¬ 
gram that could recognize character 
groups as language. 

Program Architecture 

Whenever we start to write a pro¬ 
gram, good practice advises that we first 
consider the output we want and the 
input necessary to achieve it. If we can¬ 
not define these exactly, we have no 
business slinging code. In this case the 
output is simple enough: we want a file 
containing the encoded message, or one 
containing the decoded one. For input 
we must have the key text, and the mes¬ 
sage either in clear text or in code. The 
term “user friendly” is heard a great deal 
lately, which means that the program 
must be designed so that you don’t have 
to type an input over if you make a 
mistake. These objectives will be part of 
our program requirements. 

It turns out that this is very easy using 
the Model 100’s excellent filing system. 
If the key text is written in a file, and the 
message and output are similarly treated, 
then these can interact with the cipher 
program with a minimum of hassle. 
With this arrangement we can edit any 
file without having to re-enter the whole 
thing. Figure 2 shows the general arrange¬ 
ment for our program. 

Now, let’s take a look at the cipher 
algorithm. If we look at the ASCII code 
table for the Model 100 we find that we 
will not want to use the whole table. 
Space, ASCII 32, is the lowest code of 
interest because we want to be able to 
encode spaces, and lowercase z is the 
highest at ASCII 122. We don’t want to 
use the codes below 32 because a lot of 
these are control commands for the 


computer and peripherals. The ASCII 
codes above 128 are also taboo, since 
there is very little standardization on 
what they should represent. Some com¬ 
puters don’t even recognize them at all 
and we want to achieve compatibility 
with any computer. 

If we select 32 and 122 as the limits, 
our coding algorithm will take the fol¬ 
lowing form. 

ENCODING 

Get the first characters from KEY 
and TEXT 

Convert character to its ASCII code 
ASCII CODE = ASCII KEY + 
ASCII TEXT 

If ASCII CODE is greater than 122 
subtract 90 (122 - 32). Repeat if 
necessary. 

Convert ASCII CODE to character 

and print to file 

Get next pair of characters 

DECODING 

Get the first characters from KEY 
and CODE 

Convert character to its ASCII code 
ASCII DECODE = ASCII TEXT - 
ASCII KEY 

If ASCII Code is less than 32 add 90. 
Repeat if necessary. 

Convert ASCII Code to character 

and print to file 

Get next pair of characters 

This sounds good, but there is a prob¬ 
lem. Suppose when we code we have a 
lowercase z (122) in the TEXT or KEY. 
This gets added to the other. Let’s 
assume ‘50’ as an example. 

122 + 50= 172 172 - 90 = 82 

This will be the coded character. When 
we decode we will get: 

82 - 50 = 32 


Horrors, our z has become a space 
and this is true of any number added to 
122 — the result will be the same. Sim¬ 
ilarly, we can get some confusion in the 
decode algorithm. If the code is 122 or 
32 this happens. 

122 - 50 = 72 32 - 50 = -18 -18 + 

90 = 72 

Thus z and space in the coded text 
have been decoded as the same charac¬ 
ter. This will never do and the easiest 
way to fix it is to allow the program to 
use the ASCII numbers 31 and 123 
which is permissible because the charac¬ 
ters they represent will never appear in 
our message text. The correction factor 
then becomes 92. 

Walk Through The Program 

Line 100: Clear screen, define all vari¬ 
ables as integers (faster operation), de¬ 
clare number of files and open the file 
KEY which should contain our key text. 

Line 105: Determines if we wish to 
code or decode text and tests for a valid 
input. As part of the making the pro¬ 
gram “friendly,” we will accept any 
word starting with the letters “E” or “D” 
upper- or lowercase as valid. For any¬ 
thing else we get reprompted. 

Line 110: Opens an appropriately 
labeled file for our output. We use 
CODE if we are encoding, otherwise 
DECODE. 

Line 115: Display all files in the com¬ 
puter so that we can select the one we 
want to work on. TEXT is a good title 
for the message if you like, but we can 
work with any document file. 

Line 120: Start of encryption loop. 
Gets one character at a time from the 
KEY file and converts it to its ASCII 
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equivalent. Tests for end of file and if 
found closes KEY file and re-opens it so 
that we can start again. In this way, the 
key text can be of any length and can be 
used over and over until coding process 
is complete. 

Line 125: Tests the character from 
KEY to see if it is a line feed or a carriage 
return. If so, it returns to get another 
character. If we didn’t do this we would 
not get a true translation of our text 
because the key would contain invisible 
characters that would be used as part of 
it. 

Line 130: Gets a character from our 
text file and converts it to ASCII. 

Line 135: Tests to see if the character 
is a line feed. If it is, we make a print 
statement to our output file so that it 
will end its print line the same way as the 
text file. It then tests for end of file and if 
so, exits to the finish statements. If not, 
it gets another character. 

Line 140: Tests if character is a car¬ 
riage return. If so it gets another charac¬ 
ter. We don’t want extra carriage returns 
or we will get a double-spaced output. 
When we send the print statement in 
Line 135, it will give us both line feed 
and carriage return. 

Line 145: Test for end of text file. If so 
exit loop to finish statements. 

Line 150: If we are encoding we sum 
the ASCII codes of the KEY and TEXT 
characters. 

Line 155: Test the summation to see if 
the result is within the valid range. If 
not, subtract the correction factor. The 
correction is applied as many times as 
necessary. 

Line 160: If we are decoding we sub¬ 
tract the KEY from the TEXT. 


Line 165: Test the result to see if it is 
within the valid range. If not, add the 
correction factor. 

Line 170: Treat the new number as an 
ASCII code and convert it to a charac¬ 
ter. Print this to the output file. Print 
character to screen so we can watch the 
program’s progress. Go back to Line 
120 and get next characters from files. 
This is the end of the loop. 

NOTE: By using your computer’s 
name-change function 

NAME“RAM:old filename”AS 
“RAM:new filename” 

you can store a number of coded 
files in RAM. By killing their 
straight-text counterparts and 
either killing the Cipher program 
and/or Key text file (or making 
them invisible to the MENU func¬ 
tion as published in the February 
1984 issue of PCM) you can main¬ 
tain strict file security. 

Line 175: Finish statements tell us 
coding is complete and where filed. 

Line 180: Delay loop to allow screen 
to be read, and then return to menu so 
that we can access our files. 

Line 185: Subroutine for testing for 
valid encode input. 

Line 190: Subroutine for testing for 
valid decode input. 

Line 195: Subroutine to indicate input 
is not valid and needs to be reprompted. 

This is a very simple program, but it 
demonstrates very nicely how the Model 
100 files and programs can interact. 
Now that we have our encoded message 
in CODE. DO, we can go to TELCOM 


and transmit it to the recipient, or leave 
it on a bulletin board for pick up. This is 
another example of interaction. 

Note that we have met our user 
friendly requirements. We only have to 
type our texts once. We can review and 
edit them. After coding we can decode 
as a test and this will not disturb the 
coded file. The program will not pro¬ 
ceed until it has a valid encode or 
decode command. 

Trial Run 

Go to the MENU, and select TEXT. 
Open a text file and name it KEY. Type 
into it MARY HAD A LITTLE LAMB 
and go back to MENU. 

Select TEXT and open a file called 
TEXT. Type into it MEET ME BEHIND 
THE BARN AT MIDNIGHT AND 
WE WILL WATCH THE MOON 
TOGETH ER and go back to the M EN U. 

Select CIPHER and enter E when 
prompted. Type in TEXT as a response 
to the file request and the cipher will 
appear on the screen. If you did it right 
the code will read: 

>*;Q@9*db*h9;<tD I el’28?a7Q@9. 

,n.g8At9>-@G*m=: 1 Byw-9++hat82 

tE?8nl9@-69>Br 

You can now repeat the procedure 
selecting D and CODE and you will see 
the decoded message. 

Okay, kindred secret agents, let’s go 
to work. SPECTRE, watch your step 
and SMERSH, eat your heart out, our 
messages are now secure. One final hint. 
When you go out and buy 15 copies of 
your romance novel to use as a key, 
don’t buy them all at the same time or 
someone might get suspicious. Also, 
make sure they are all the same edition, 
we don't want any slip-ups. 



100 CLS:DEFINTA-Z:CLEAR:MAXFILES=3:OPEN" 
KEY"FOR INPUT AS 1 

105 INPUT"(E)ncode or (D)ecode ";C$:G0SU 
B 185:IF CS=""THEN 105 

110 IF C$="E"THEN OPEN"CODE"FOR OUTPUT A 
S 3 ELSE OPEN "DECODE"FOR OUTPUT AS 3 
115 FILES:INPUT"5elect subject file “jFS 
:OPEN FS FOR INPUT AS 2 
120 K S = IN P U T S (1 ,1) : K = A 5 C (K $) : l’F E0F(1) T 
HEN CLOSE 1:OPEN"KEY"FOR INPUT AS 1:GOTO 
120 

125 IF K =10 OR K =13 THEN 120 
130 S$= INPUTS(1,2):S=ASC(S$) 

135 IF 3=10 THEN PRINT:PRINT#3IF E0F(2 


)THEN 175 ELSE 130 
140 IF S=13 THEN 130 
145 IF EOF(2) THEN 175 
150 IF CS="E" THEN 0 = S + K 
155 IF 0>123 THEN Q=Q-92:GQT0 155 
160 IF C$= H D"THEN Q = S-K 
165 IF 0<31 THEN Q=Q+92:G0T0 165 
170 0$=CHR$(0):PRINT 01;:PR INT#3,0$;:GOT 
0 120 

175 PRINT:IF Cl="E"THEN PRINT"Coding com 
plete, stored in file CODE.DCTELSE PRINT 
"Decoding complete, stored in file DECOD 
E. DO 

180 FOR 1=1 TO 1000:NEXT:MENU 
185 IF LEFTS (C$,1) = "E"QR LEFTS (CS , 1) = 11 e" 
THEN C$="E":RETURN 

190 IF LEFT$(C$,1)="D"0R LEFTS( CS , 1) = " d " 
THEN C$="D":RETURN 

195 CS="":RETURN nran 
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Monsters & Magic 

The most realistic fantasy role-playing game yet for the 
ColorComputer. You start out by rolling upyourcharacter’s 
basic ability scores and buying equipment. When you are 
ready it’s into the dungeon. Your character starts at first 
level, but can rise in levels by garnering experience in the 
fray. If you have role-played fantasy games you will be 
amazed at the realism of the combat system. Armor class, 
initiative, and damage by weapon type are all included, 
with over 50 different monsters to fight - each with it’s own 
abilities. As you rise in level you can win treasure and find 
magic weapons and spells - if you live!! You set the game 
length by telling how many monsters you want to fight 
before you reach your final battle to the death against the 
powerful Dungeon Lord. There are 1000+ place descrip¬ 
tion combinations in this text based game, and real excite¬ 
ment in every one! This is a fantasy simulation, and is truly 
not like any adventure game you have ever seen. For 1 
player. $19.95 tape—24K 


Astrology 

Truly a classic, this program will accurately cast your 
complete horoscope. You just enter the date, time, and 
place of birth. The sun sign, rising sign, mid heaven (MC), 
lunar nodes, and planetary influences including houses 
and aspects between the planets will all be calculated, and 
a full chart drawn. You can also do progressed charts and 
transits. It will even tell you the day of the week you were 
born. The accompanying book will help you interpret this 
chart of your horoscope. The extent of the documentation 
is tremendous, even by our exceptionally high standards, 
and no previous knowledge of the subject is required. You 
can share in this wisdom which has been used for thou¬ 
sands of years in many cultures. This program was written 
by a professional Astrologer. $34.95 tape — 16K 


tv- 


Viking! 




A simulation for 1 to 4 persons. Each begins as a land- 
owner, and by farming their land, buying and selling land, 
expanding their fishing fleet, building on to their manu¬ 
factory, increasing their population, equiping and training 
more soldiers, and regulating theirtaxes, each playertries 
to increase their economic power and rank until one 
becomes ruler over all. But beware plagues, rats, raiders, 
revolts, bad weather, and other misfortunes which may lie 
along the road to success. As you progress, see the map of 
your holdings increase. Playable in 1 to 2 hours, and 
different every time, you may have an addiction problem. 
$19.95 tape — 24K 



If you ever wanted to try a life of crime, this is your chance. 
You will start out as a Punk, but by using brains, and a little 
muscle, you can rise to become a Hood, Runner, Bookie, 
Torpedo, Fence, Kingpin, or win by becoming Syndicate 
Boss. Indulge yourself. Bribe a judge, or the District 
Attorney. Pay off the Cops. Take out a contract on another 
player, but watch out, they may be after you. Buy trucking 
companies, bootleg operations, houses of ill fame, but 
remember, if you get caught, you may do some hard time. 
Do you have what it takes to take over? This game will keep 
you close to your rod, get you thinking about bulletproof 
glass in your car, and definitely bring out the worst in you, 
but you’ll love every minute of it. For 2 to 6 players, takes 
about 2 hours to play. Every game is excitingly different. 
$19.95 tape — 24K 


{ 


Your personal check is welcome - no delay. Include 
$1.50 shipping for each program ordered. (Shipping free 
on $50.00 or larger orders). AZ residents add 7% sales 
tax. Orders shipped within two days. 


Stocked by Quality Dealers, or 

Send Order To: PRICKLY-PEAR SOFTWARE 


9234 E. 30th Street 



Tucson, Arizona 85710 


MasterCard 

VISA 

.- 

(602) 886-1505 





MSDOSsier 



Part IV 


By Danny Humphress 
PCM Technical Editor 


I f you’ve followed this series for the 
past three months, you are already 
familiar with the fundamentals of 
our favorite operating system, MS-DOS. 
You learned about file and directories 
and you’ve begun to use commands that 
manipulate files. To date, the files that 
we’ve been working with have been 
those that were on our MS-DOS disk 
when we received it. This month, we’re 
going to learn how to create files using a 
special feature of the COPY command 
and MS-DOS’s built-in “mini-word- 
processor,” EDLIN. 

The Many Faces of COPY 

We learned that COPY will make a 
copy of a single file or group of files 
from one disk to another. It will also 
allow you to have two copies of a file on 
the same disk as long a both copies have 
different names or are in different direc¬ 
tories (more on directories later). 

The great thing about COPY is that 
it’s not limited to just files. Remember 
the very first MS-DOSsier when we dis- 


(Danny Humphress, PC M's Technical 
Editor, is the owner of a computer soft¬ 
ware and consulting firm in Louisville, 
Ky. Danny brings to PCM his extensive 
experience with small business compu¬ 
ters and applications software.) 


cussed how a computer is a combina¬ 
tion of devices such as a disk drive, key¬ 
board, printer, and display. COPY’S 
main function is to copy data from one 
device to another. Granted, the devices 
that COPY usually uses are the disk 
drives, but it can do much more than 
that. Take a look at this command line. 

COPY A:PAYROLL.DAT B: 

You’ll remember from last month 
that this command will copy the file 
called “PAYROLL.DAT” from drive 
A: to drive B:. The ‘A:’ and l B:’ in this 
command line are device names for the 
two disk drives (refer to MS—DOSsier 
Part 1). We could easily substitute just 
about any other device name for ‘A:’ or 
fc B:’. For example: 

COPY A:PAYROLL.DAT LPT: 

This command would copy “PAY 
ROLL.DAT” from drive A: to the line 
pHnter since “LPT:” is the device name 
for the line printer. The contents of the 
file would be printed by the printer. See 
if you can deduce what the following 
command would do: 

COPY LPTiPAYROLL.DAT A: 

Of course, it would copy “PAY 


ROLL.DAT” from the printer to drive 
A:. Wait a minute! You can’t copy a file 
from a printer, the printer is an “output 
only” device. There are some cases, like 
that above, that are not logically valid, 
so think about what you’re trying to do 
when using COPY this way. 

You can only COPY from input devi¬ 
ces to output devices. Some devices, 
such as the disk drives (A:, B:, C:) are 
considered “input/output” devices, or 
“I/O.” and can be used for either input 
or output. Another example of an input/ 
output device is the “console.’’The con¬ 
sole (CON:) is the logical device name of 
the keyboard and display combination. 
Input from the console comes from the 
keyboard (of course), and output goes 
to the display screen. 

Given what you know about the 
CON: device, determine what the fol¬ 
lowing command line would produce: 

COPY A:PAYROLL.DAT CON: 

The contents of “PAYROLL.DAT” 
on drive A: would be “copied” to the 
display. In effect, the data in the file 
would be displayed on the screen. This 
can be very useful when you want to see 
what’s contained in a file. Since this is 
something that is so often needed, the 
creators of MS-DOS provided us with 
an easier to use alternative to this with 


16 PCM August 1984 






the‘TYPE'"command. For now, though, 
our concerns are with COPY. 

Think about this command: 

COPY CON: A:TESTFILE 

This would copy whatever is entered 
from the keyboard to “TESTFILE” on 
drive A:. If the file was not previously 
on the disk, it will be created. If it is on 
the disk, the contents will be erased in 
favor for the new data that is being 
entered. 

When you use COPY this way, the 
cursor drops down one line and you can 
type anything you like. As you type, the 
data is written to the file on the disk. 
When you are finished, you type the 
“end-of-file” character CONTROL Z which 
tells the COPY command that it has 
“read” all the data from the keyboard. 

Let’s try a practical example of this 
function of COPY. With a backup of 
your MS-DOS master diskette in drive 
A:, type the following: 

COPY CON: A:TESTFILE ENTER 


REAGAN ENTER 

CARTER ENTER 

FORD ENTER 

NIXON ENTER 

JOHNSON ENTER 

KENNEDY ENTER 


CONTROL Z 

When you press CONTROL Z, the file is 
saved to the disk and control is returned 
to MS-DOS. (To get CONTROL z, hold 
down CONTROL and strike ‘Z\ Use the 
CONTROL key as you would SHIFT. 

You’ve created “TESTFILE” on drive 
A:. If you don’t believe it, type this 
command to display the contents of the 
file on the screen: 

COPY A:TESTFILE CON: ENTER 

Aren’t computers wonderful! 

COPY is often used to create short 
files on a disk. The problem is that once 
you have the file on the disk, the only 
way that COPY could change it would 
be to retype the entire file. This is fine 
for short little files but for a larger one, 
you need a more powerful command. 

Enter EDLIN 

EDL1N is a line-oriented word pro¬ 
cessor. It is not actually a built-in MS- 
DOS command, but an entire program 
with commands of its own. In addition 
to the file creation ability found in 
COPY, EDLIN allows you to edit or 


add on to existing files. 

Let’s use EDLIN to create a file that 
we’ll call “FILE2” (how imaginative). 
To start editing FILE2 with EDLIN, 
type this command: 

EDLIN A:FILE2 ENTER 

This tells EDLIN that we are working 
with“FILE2”ondrive A:. If the file was 
not already in the directory (as in this 
case), it would be created, otherwise, it 
would be loaded into memory and we’d 
be allowed to edit it. 

EDLIN will display the following: 

New file 
*_ 

The asterisk (*) is the EDLIN prompt. 
It tells you that EDLIN is waiting for 
your command. EDLIN has its own set 
of commands totally different from those 
used in MS-DOS. The first thing we 
want to do is to “insert” data into this 
newly created file. The command for 
insert is “I.” Type: 

I ENTER 

The screen should now look like this: 

New file 

*1 

1 :*— 

The “1:tells you that you are work¬ 
ing on line one of the file. 


Type these lines: 


BANANA 

SPLIT 

ENTER 

APPLE PIE 

ENTER 

PEAR PUDDING 

ENTER 

CHERRY SODA 

ENTER 

PEACH MELBA 

ENTER 

GRAPE JUICE 

ENTER 


When EDLIN displays the next line 
number (7:*), press CONTROL C. This 
exits the insert mode and returns you to 
the asterisk prompt. 

Now tell EDLIN to display the third 
line by typing: 

3 ENTER 

The screen will look something like 
this: 

*3 

3:*PEAR PUDDING 
3:*- 





Back Issue 
Availability 

Back copies of many 
issues of PCM are still 
available. 

All back issues sell for 
the single issue cover 
price. In addition, there is 
a $1.25 charge for the first 
ordered issue, and 50 
cents for each additional 
issue, within the U.S., 
Canada and Mexico for 
postage and handling by 
United Parcel Service. 
UPS will not deliver to a 
post office box or to 
another country. 

VISA, MasterCard and 
American Express ac¬ 
cepted. Kentucky resi¬ 
dents please add 5 per¬ 
cent state sales tax. We do 
not bill and no C.O.D. 
orders accepted. 

We suggest you order 
back issues you want now 
while supplies last. 

To order, just fill out the 
form on the next page and 
mail it with your payment 
to: 

PCM 

9529 U.S. Highway 42 
P.O. Box 385 
Prospect, KY 40059 
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BACK ISSUE ORDER FORM 

□ Please send me the following back 
issues: 

(Payment must accompany back issue 
orders.) 

VOLUME 1 


NO. 

MONTH 

YEAR 

PRICE 

1 

JULY ’83 

PREMIER ISSUE $3.00 □ 

2 

AUG. ’83 

$3.00 □ 

3 

SEPT. ’83 

$3.00 □ 

4 

OCT. '83 

$3.00 □ 

5 

NOV. ’83 

$3.00 □ 

6 

DEC. '83 

$3.00 □ 

7 

JAN. '84 

$3.00 □ 

8 

FEB. ’84 

$3.00 □ 

9 

MAR. ’84 

$3.00 □ 

10 

APR. ’84 

$3.00 □ 

11 

MAY ’84 

$3.00 □ 

12 

JUN. '84 

$3.00 □ 


TOTAL 

SHIPPING & HANDLING 
KY RESIDENTS ONLY 
ADD 5% 

TOTAL AMOUNT 
ENCLOSED 
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You are may now make changes to 
this line or press ENTER to return to the 
EDL1N command prompt. 

Let’s change “PEAR PUDDING” to 
“PLUM PUDDING.” Personally, the 
idea of plum pudding is no more appet¬ 
izing to me than pear pudding, but just 
for example’s sake. . . 

Press the right arrow key [—] once. 
The letter k P’ should appear and the cur¬ 
sor will move one space to the right. 
This key tells EDLIN to copy one char¬ 
acter from the “template” (the original 
line) to the new line. 

Now type “LUM”to finish the letters 
of “plum.” When you type a character, 
you overwrite the corresponding char¬ 
acter in the original line. 

We are now up to the space in the 
template. At this point, we could just 
press ENTER and the line would read 
“PLUM,”or we could continue editing. 
We want to continue. 

Press [—] three times and the line 
should now look like this: 

3:*PLUM PU- 

You’ve just copied three more charac¬ 
ters from the template, the space and ‘P’ 
and fc U.’ You could continue to use the 
right arrow key until the line reads 
“PLUM PUDDING,” or you could use 
a special function to copy to the end of 
the template. Press the F3 function key. 

The cursor will jump over and the 
screen will now look like this: 

3:*PLUM PUDDING — 

Press ENTER to store this updated 
line. 

EDLIN also allows you to insert 
characters into a line template. Let’s 
change “BANANA SPLIT” to “BA¬ 
NANA NUT SPLIT.” We need to insert 
“NUT” and another space between 
“BAN ANA”and “SPLIT.’’“BAN AN A 
SPLIT” is in line one of the file, so we 
need to tell EDLIN to allow us to edit 
that line by typing: 

1 ENTER 

The screen will look like this: 

*1 

1:*BANANA SPLIT 
Im¬ 
press [-*] five times to reveal the 
word, “BANANA.’’The screen will now 
look like this: 


*1 

1:*BANANA SPLIT 
1:*BANANA— 

Locate the key marked INSERT (above 
the numeric keypad on the right side of 
the keyboard) and press it. You have 
turned on the “insert mode.” any char¬ 
acters you type now will be inserted into 
the template instead of replacing tem¬ 
plate charactes. When you press INSERT 
again, you turn off the insert mode. 

Press the spacebar once and type the 
word, “NUT.” The screen will now 
appear as this: 

*1 

1:*BANANA SPLIT 
1:*BANANA NUT 

A space and the word “SPLIT” is 
remaining in the template. 

Turn off the insert mode by pressing 
INSERT. Now press [F3] to copy the 
remaining characters from the template 
into the edit line and you’ll see this on 
your screen: 

*1 

1:*BANANA SPLIT 
1:*BANANA NUT SPLIT- 

Press ENTER to store the edited line. 

Do we really want nuts on our split? 
Let’s take them off and save the calo¬ 
ries! Press U ’and ENTER to edit line one. 
Press the [—] key seven times to copy 
the word “BANANA” and a space to 
the edit line. The screen will look like 
this: 

*1 

1:*BANANA NUT SPLIT 
1:*BANANA— 

We now want to delete the next four 
characters (“NUT” and a space). This is 
quite simply done by pressing the DELETE 
key (located near INSERT) four times. 
Each time you press DELETE, a corres¬ 
ponding character is removed from the 
template. 

Press [F3] copy the remaining char¬ 
acters from the template and your screen 
will look like this: 

*1 

1:*BANANA NUT SPLIT 
1:*BANANA SPLIT- 

Press ENTER to enter the edited line 
into our file. 

By now, our screen is full of lines of 
editing and we cannot see the other lines 
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of the file. This is no problem. One of 
the commands available to you in 
EDL1N is the ‘P’ (Page) command. 4 P’ 
allows you to list a series of lines to the 
screen. Type this: 

P ENTER 

Since line one was the last line we 
worked on, it is the “current” line. 4 P’ 
will display the list we entered. 

If you don’t tell ‘P’ otherwise, it will 
list a page (a screen full) of lines starting 
with the line after the current line. If the 
current line is one (as is the case here), 
then it is the first line listed. Like most 
single-letter commands available in 
EDL1N, ‘P’ allows you to specify a 
beginning and ending line number for a 
range. The format for 4 P’ is: 

[line l][,line2]P 

Where[linel]and [,line2]are optional 
line numbers. Try this: 

1,3L ENTER 

This tells EDL1N to list lines one 
through three and the screen will look 


like this: 

*1,3P 

1:BANANA NUT SPLIT 
2:APPLE PIE 
3:*PLUM PUDDING 

* _ 

Notice the asterisk at the third line. 
The asterisk marks the current line. 
When you use ‘P\ the current line is 
changed to the last line displayed. 

If you omit the second line number, 
'P’assumes that you want to print to the 
end of the file or until the screen is full. 
Try this: 

3P ENTER 

EDL1N will list the file starting with 
the third line. The current line is now 
line six. 

If you omit the first line number, 4 P’ 
will assume that you want to begin with 
the line following the current line. The 
format to do this would be: 

,nP 

The 4 n’ would be a legitimate line 


number.The comma tells EDLIN that 
we are not specifying a starting line. The 
current line is now six (the last line), so it 
won’t do much good to use this format 
of ‘P’ now. 

Up to this point, everything we’ve 
done has been in the computer’s mem¬ 
ory. The idea is to get this stuff into our 
disk file. This happens when we exit 
EDLIN by pressing k E’ and ENTER. 4 E’ 
(end) saves the memory contents and 
returns control to MS-DOS. Go ahead 
and press 4 E’ to save our file and get out 
of EDLIN. 

Another way of exiting EDLIN is 4 Q’ 
(quit). This command returns to MS- 
DOS without saving the changes that 
were made to the file. 

There are many more commands avail¬ 
able with EDLIN than we have room to 
discuss this month. Some of the goodies 
available let you move lines around, 
search for words in the file, globally 
replace words, and so many other nifty 
things. We’ll take a look at those in 
September. Until then, get brave and do 
some exploring on your own. The 
“EDLIN” section of your MS-DOS 
manual should make more sense to you 
after what you’ve done today. \ J4w~i 


ThinType™ 80 


BATTERY POWERED LETTER QUALITY PRINTING 


True Solid Font Portable Printing 

ThinType’s self contained A/C Adapter/ 
Charger and Rechargeable Batteries 
provide Letter Quality Printing Anytime, 
Anywhere! 

• 15 C.P.S. Bidirectional Impact 
Printing 

• No Thermal-Ink/Jet Print Smear 
Problems 

• Over 2 Million Characters 
Per Replaceable Ink Roll 

• Easily Operates in Half a Briefcase 


Retail Price: $395 




“Some Have It, Some Don’t” 


Aconix 


Call Toll Free 800-821-7093 or 801-582-9271 


The Portable Peripherals People 
417 Wakara Wav, S.L.C., Utah 84108 
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Tdccommmucalimg With PtoCo 

Going online with this major news service puts 
you directly in touch with much of the data you 
need for informed financial decision making: 



O kay, down off last month's soap¬ 
box. Let’s resume our electronic 
odyssey. 

For the past few months, we have 
been on a sightseeing tour of popular 
information services. This month, the 
bus stops at the third in the series: Dow 
Jones. Just to take a quick glance over 
our shoulder, we said that you probably 
met Dow Jones News Service at the 
Radio Shack store when you bought a 
modem cable for your PoCo. Included 
in the package was a free subscription to 
CompuServe and one to Dow Jones. 
We have already visited CompuServe 
and The Source (which we discovered 
elsewhere). On with the tour. 

Your faithful guide must confess that 
this is where he starts mumbling and 
stuttering. 1 know less about DJ than 
any of the others, simply because I do 
not have much use for it. There are a 
great many people who use stock market 
type information all day in their work. 
It seems important for them to have the 
latest, most complete and reliable data. 
For many, many others, the stock mar¬ 
ket is a major spectator sport. They fol¬ 
low "The Dow” like some folks do the 
NBA, keep up w r ith the performance of 


(Randy Graham is a rehabilitation 
counselor working with the handi¬ 
capped. Personal computing is his 
hobby; telecommunications t one of his 
favorite activities. He has done free¬ 
lance information retrieval and is an 
inveterate user of the major online 
systems.) 


the companies -m whi*4i their pension 
fund invests, and keep up-to-date on the 
“stars.” I must confess that I am not 
among them, 1 do not need market or 
financial information at work, nor do l 
follow' the market for fun. And so, l 
seldom logon to Dow Jones except for 
research purposes. 

What you find is what you would 
expect: corporate information about 
publicly owned stocks, market quotes, 
histories of performance of stocks, etc. 
if you want it, this is an authoritative 
source. 1 feel that ifyouarea Dow Jones 
type, 1 am telling things you already 
know. The chance to keep up with the 
market may have been the main reason 
you acquired a PoCo. 

What I can tell you is that if you have 
been building up some experience on 
bulletin boards, CompuServe and The 
Source, you will not have any trouble 
with DJNS. They provide very clear, 
complete manuals to help you get ac¬ 
quainted, When you logon, you will be 
greeted by an online newsletter, which is 
free, and then a menu. As on most serv¬ 
ices now\ HELP is only a “slash com- 
mand”aw r ay. You can also branch off to 
MCI Mail for which DJ does not charge 
connect time. MCI Mail charges are 
only generated when you send mail. 

There are other databases on Dow 
Jones, There is a news service w hich is 
frequently updated, backed up by an 
online encyclopedia for background in¬ 
formation. You can read reviews, plan 
airline schedules and order merchan¬ 
dise, All of these services have the busi¬ 


ness person in mind. When not buying 
and selling stocks, they travel and enter¬ 
tain, etc. The new r s stories cover all 
areas, but from a business perspective, 
like the Wall Street Journal, its hard¬ 
copy cousin. 

Now i am going to say something 
almost negative, something I try to 
avoid in this series. As a mass marketing 
strategy, DJNS has been stressing its 
general appeal. If you are not a business 
or financial type, will you get much 
from Dow Jones? Not really. Most of 
the general services are available on 
other services. But to be fair, if you can 
join free and there is no minimum 
charge, and costs are modest, why not? 
You can always sample their databases, 
show off to your business friends and 
pick up tidbits to drop into the conver¬ 
sation at the neighborhood cookout. 
Personally, 1 get all the news 1 want as 
fast as 1 need it from the papers and 
news magazines. 

Well, that didn't take long. I think we 
have time to stop by another informa¬ 
tion service 1 recently discovered. Every¬ 
body back on the bus! 

Delphi 

There is an information utility in the 
Boston area, known as Delphi, which 
has all the marks of having outgrown 
the bulletin board stage and is getting 
into the class with CompuServe and 
f he Source. It is owned and operated by 
Boston Telecomputer. It has the usual 
bulletin boards, conferences, mail, 
games, library, etc. It has more services 
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and features than a major bulletin board 
like the Rainbow Connection, but not 
as much as you will find on The Source 
or CompuServe. One of its cornerstones 
is its online Kussmaul Encyclopedia. 

1 found it interesting, but not neces¬ 
sary to my needs. 1 am sure that more 
familiarity will lead to discovery of 
unique features, “neat” programs not 
found elsewhere and new friends. One 
problem a PoCo user will have is the 
long main menu which will scroll right 
off into oblivion if you do not stop it. It 
is a very user-friendly system with a lot 
of HELP messages. 1 must confess that 1 
had never heard of the Kussmaul Encyc¬ 
lopedia. 1 tried it out a couple of times, 
looking for information on current pol¬ 
itical candidates without success. 

Access to Delphi is via Tymnet and 
charges are very modest: $6 per hour. 
Subscription is advertised at $20. For 
more information, call them at 1-800- 
544-4005 (say you heard about them in 
PCM). 

Miscellaneous 

Notes pile up. We must occasionally 
clean out the old RAM files to make 
room for new projects: 

If you subscribe to an information 
service, you have found that they all 


publish magazines and newsletters to 
keep you up-to-date: CompuServe’s On¬ 
line Today, Dow Jones’s Dowline, the 
Source’s Sourceworld , etc. 

Today’s latest issue features an article 
by their Executive V.P. on “Unauthor¬ 
ized Access” — still a lively topic. I read 
your article, Mr. Minot; did you read 
mine? As I write this, the popular press 
has been excited again about someone 
breaking into a national credit file sys¬ 
tem. Please note that the problem seems 
to have been that a dishonest or careless 
employee who was entitled to the access 
code at work let it fall into the hands of 
unauthorized person(s) who put it up on 
a bulletin board. As usual, the security 
problem was not at the system end but 
at the user end. If you do not lock your 
door, the police will investigate the bur¬ 
glary, but they will not be very sympa¬ 
thetic! As I said last month — system 
security is adequate; end-user security is 
up to you. 

If you like to read about telecommun¬ 
ications, Link-Up Magazine is support¬ 
ing the field. For subscription informa¬ 
tion, write them at P.O. 26345, Minne¬ 
apolis MN 55426 (mention PCM). 

A recent birthday brought gifts of 
The Computer Phone Book by Mike 
Cane (New American Library, 1983) 


and Omni’s Online Database Directory 
by the staff of Omni Magazine , Robert 
Weil, editor, et al. (McMillan, 1983). I 
find both useful references although 
bulletin boards and databases come and 
go so fast that printed materials tend to 
get out of date before they reach the 
market. It is hard enough to keep a 
magazine current! 

Writing a column or series is very 
educational. It no sooner appears in 
print than people you never heard of 
call or write to tell you what you said 
wrong. Thanks to a CompuServe friend 
(whose name got lost in the pile of 
notes) for showing me that you can 
indeed send yourself Email on Compu¬ 
Serve. This is useful for practice and 
also to keep “carbons” in your file 
space. 

1 also said that you cannot “CHAT” 
privately with another subscriber on 
CompuServe as you can on The Source. 
Wrong. CIS’s command is “TALK”. On 
both systems you have to discover that 
they are online by recognizing ID num¬ 
bers and getting their “JOB” numbers; 
i.e., which port they are working at the 
time. 

Well, that’s enough work for a hot 
summer day. Let’s head for the beach! 








v/sa 
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BUSINESS 

* Skyline Software 

PortaTax - tax planning program 
(32K) £99* 5 $94.95 

PortaCalc - Electronic spreadsheet 
PortaPrint & PortaDex included 
(24K) cassette £6*95 $66.45 

‘PortaStat - statistical package 
‘PortaMax - linear programming 
*PortaFin - loan & investmentpkg. 
*PortaFolio 

(24K) £44*5 $39.95 ea. 

Portable Computer Support Group 

Business Pak+ includes: 

Write +, Graph+, Expns+, Telex+, 
Put +, Sort+, & a 120-page manual 
6 cassettes (8K) £449*5 $85.45 

Data+,Tenky+ (8K) 

£69*5 $56.95 ea. 
Sort+,Tutor+ (8K) 

£29*5 $28.45 ea. 


Personal checks and 
PURCHASE ORDERS WELCOME. 

Please add $2.00 for shipping 
in the U.S.A. 

Tennessee residents 
add 6.25% sales tax. 

C.O.D. orders add $2.00. 

Send for FREE 

complete catalog and descriptions! 


Chattanooga Systems Associates 

Book-Bookeeping , 

Tfile- Tape File Management , 
Check-Checking Account Record , 
\n6ex-List Processor, 

Calc -General Purpose Calculations 
(8K) £39*5 $28.00 ea. 

Scribe-Word Processor 

Formats & prints from text files. 
(8K) £29*5 $28.00 

Expanded Scribe (version 3.1), 
Plus version 3.0 

£99*5 $37.50 

8K RAM MODULES 

£64*5 $59.95 ea. 


RECREATION 

Silverware 

Games 1 - 4 games on cassette 
Blockade, Frankenstein Adventure 
Reversi, Alexis Adventure 
(24K) £94*5 $23.70 

Games 2 - 4 games on cassette 
Maximum, Checkers 
Amazing Chase 
Williamsburg Adventure 
(24K) £99*5 $23.70 

Prickly-Pear Software 10% OFF 

Viking - (24K) simulation game 

£49*5 $17.95 

Football Quarterback Strategy 
(16K) £49*5 $17.95 

*NEC & M100 



P.O. Box 15892 • Chattanooga, TN 37415 
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A Few Good Bars 
(Cover Charge Only) 


V ersions of Lotus 123, Supercalc 3 
and Open Access, those fancy 
spreadsheet/graphics packages, 
are finally available for the Model 2000. 
You may find, though, that you don’t 
want to pay for the multitude of features 
that these fine packages offer. If all you 
want from your Model 2000 is a simple 
bar graph, it can be yours for just the 
cover price of this magazine and a little 
typing work. 

This unadorned little program will 
produce a nice looking color bar graph 
on your Model 2000 display and op¬ 
tionally print it on a CGP-220 ink jet 
printer. Nothing fancy, mind you —just 
an easy-to-read bar graph. 

There are three main functions of the 
program which may be selected from its 
menu. The first selection allows you to 
tell the program the title of your bar 


graph, an X axis title, and the number of 
bars in the graph. Selection two allows 
you to enter the actual figures and titles 
for the individual bars in the graph. The 
third selection displays your bar chart 
on the color monitor and optionally 
print it on a CGP-220 printer. 

The program automatically adjusts 
the Y axis range for any value from zero 
to 100,000. For numbers larger than 
100,000, divide by a factor of 10. If your 
highest value is 10 million, just enter 10. 
The width of the bars is automatically 
adjusted depending upon the number of 
bars in your graph. The maximum 
number of bars was made seven to 
match the number of colors available in 
addition to the white background. 

You may change entered data at any 
time by simply selecting function 1 or 2 
and re-entering the information. 


By Danny Humphress 
PCM Technical Editor 

The program will run without modi¬ 
fication if you will not be using a CGP- 
220. If you want this feature, you’ll need 
to change the first line to read as: 

1000 SP=1 

This enables the screen print option. 
Once this change has been made, you 
are given the option to print the screen 
as you display it. 

You’ll also need to make sure you 
have CGPDMP.BIN, a graphics dump 
program included on all Tandy 2000 
MS-DOS master disks, on your defult 
drive. Enter basic using the following 
command line: 

BAS1C/M:&HFF00 

This sets aside memory for the 
CGPDMP.BIN screen dump program. 


The listing: 


BARGRAPH.BAS 
1000 SP = 0 

1010 IF SP THEN CGPDMP*&HFF00:BL0AD"CGPDMP.BIN",CGPDMP 
1020 ' BARGRAPH.BAS 
1030 KEY OFF 

1040 DEF FNC4*(X$)=SPACE*(20-.5*LEN(X*))+X* 

1050 DEF FNC8*(X*)=SPACE*(40-.5#LEN(X*))+X* 

1060 DIM BAR.VALUE(7),WORD(1000) 

1070 WIDTH(40):CLS:SCREEN 1:COLOR 1 sPRINT:PRINT:PRINT:PRINT FNC4*("B A R G R A 
P H") 

1080 PRINT; PRINT: PRINT " ========= = = ===== ==**==:= ===== = = =======« 

1090 PRINT:PRINT " 1. Enter Bar Graph Format Information" 

1100 PRINT:PRINT " 2. Enter Bar Graph Data" 

1110 PRINT:PRINT " 3. Display Bar Graph" 

1120 PRINT:PRINT * 4. Exit Program" 

1130 PRINT: PRINT " .= = = = = = = = = = ======= === = = ==.=='■ 

1140 SELECT**INPUT* (1) 

1150 SELECT 7. = INSTR(" 1234", SELECT*) 

1160 IF SELECT7.=0 THEN BEEP: GOTO 1140 
1170 ON SELECT7. GQSUB 1 190,1280,1390,1790 
1180 GOTO 1070 

1190 ' Enter Bar Graph Format Information 

1200 CLS:PRINT:PRINT FNC4*("Enter Bar Graph Format Information") 

1210 PRINT 

1220 LINE INPUT"Bar Graph Title: "$TITLE*:IF TITLE**"" THEN TITLE**" " 

1230 PRINT 

1240 LINE INPUT"X Axis Title: X.TITLE*:IF X.TITLE**"" THEN X.TITLE** 
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1250 PRINT 

1260 LINE INPUT"Number of Bars (7 Max): 11 5 BAR*: BARX-VAL (BARS): IF BARX<2 OR BAR7.> 
7 THEN BEEP:GOTO 1260 
1270 RETURN 

1280 ' Enter Bar Graph Data 

1290 CLS:PRINT:PRINT FNC4S("Enter Bar Graph Data") 

1300 HIGH=0 

1310 FOR IX 8 1 TO BAR’/. 

1320 PRINT 

1330 PRINT USING " Bar « " 5 IX; 

1340 LINE INPUT "Value: "5 VALUE*:BAR.VALUE(IX)»VAL(VALUE*) 

1350 LINE INPUT " Title: BAR.TITLE!(IX )1 IF BAR.TITLE*<IX)■"" THEN 

BAR.TITLE#(IX)=" " 

1360 IF BAR.VALUE(IX)>HIGH THEN HIGH -BAR.VALUE(IX) 

1370 NEXT IX 
1380 RETURN 

1390 ' Display Bar Graph 

1400 ANS 8 "":IF NOT(SP) THEN 1430 

1410 LOCATE 10,4:PRINT"Do you want to print this graph?"; 

1420 ANS = INPUTS< 1 >: IF INSTR("YyNn",AN*>=0 THEN BEEP:GOTO 1420 
1430 SCREEN 3:WIDTH(80):CLS 

1440 PALETTE 0,0:PALETTE 1,4:PALETTE 2,2:PALETTE 3,6:PALETTE 4,1:PALETTE 5,3:PAL 

ETTE 6,5:PALETTE 7,7 

1450 LINE(0,0)-(639,399),7,BF 

1460 LINE (50,19)-(620,351) ,0,B 

1470 IF HIGH< = 10 THEN T0P=10:INCRX—1:GOTO 1510 

1480 FOR J=0 TO 100000! STEP 50 

1490 IF HIGH < 8 J THEN TOP=J:INCRX-J/10:GOTO 1510 
1500 NEXT J 

1510 BAR.WIDTH 8 560/BARX 

1520 FOR IX=1 TO 9:LINE (50,33*IX+20)-(620,33*IX+20),0:NEXT IX 
1530 FOR IX=1 TO BARX 

1540 YX=350-(BAR.VALUE(IX)/TOP )*330 

1550 XX=(IX-1)*BAR.WIDTH+50 

1560 LINE (XX+10,350)-(XX + BAR.WIDTH,YX),IX-1,BF 
1570 LINE (XX+10,351)-(XX+BAR.WIDTH,YX),0,B 
1580 NEXT IX 

1590 WORDS=TITLE$:GQSUB 1740: PUT(320-. 5*LEN(WORD!)* 8 ,2),WORD,PRESET 
1600 FOR IX=1 TO BARX 

1610 XX=(IX — 1> *BAR.WIDTH + 55+.5*BAR.WIDTH 

1620 WORDSTAR.TITLE!(IX)sGOSUB 1740:PUT(XX-.5*LEN(WORD!)*8,354),WORD,PRESET 
1630 NEXT IX 

1640 WORD$=X.TITLES:GOSUB 1740:PUT(320-.5*LEN(WORDS)*8,375),WORD,PRESET 
1650 FOR IX=10 TO 0 STEP -1 
1660 YX = 33*IX+15 

1670 LOCATE 1, 1: PR I NT USING "##### “; (10-17.)* INCRX 
1680 WORDS 8 " "sGOSUB 1760 

1690 PUT <0,YX>,WORD,PRESET 

1700 NEXT IX 

1710 IF SP THEN CALL CGPDMP(ERX) 

1720 IF INKEYS 8 "" THEN 1720 
1730 RETURN 
1740 ' 

1750 LOCATE 1,1:PR I NT WQRDS +" " 

1760 GET (0,1)-( 8 *LEN <WORDS) ,13),WORD 
1770 LINE (0,0)-(8*LEN(W0RDS)+16,16),7,BF 
1780 RETURN 
1790 ' Exit Program 

1800 SCREEN 1:WIDTH (80):CLS:END c 
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Your 2000 Can 
Help Access Those 
Applications 

By Lawrence C. Falk 


L ast month we talked about how 
you can organize files in your 
Tandy 2000 so that you could 
have one application program in a sin¬ 
gle directory. 

One of the advantages of this setup is 
that it enables you to keep things to¬ 
gether and make individual directories 
manageable. This is particularly so when 
you have programs, such as Multiplan , 
which create files you will want to look 
at and use again. 

However, there is a slight disadvan¬ 
tage, too. You have to get to the direc¬ 
tories stored on either your hard or 
floppy disk. If you are “into” compu¬ 
ters, this can be fun — typing myste¬ 
rious commands to move yourself 
around to the place you want to be. 

But, let’s face it — most of the reason 
for having a computer in the first place 
is to make life easier for all of us. And, 
remembering a bunch of commands 
isn’t a very easy thing to do. So, what 
we’ll do here is show you how to let your 
2000 do the work for you! 

The example we will use will be with 
Multiplan , although you can use the 
same thing with almost any application. 
The reason for this is simply that we will 
be using the operating system, not the 
application programs. So, what we are 
going to do here will work with any 
application program. And, for that mat¬ 
ter, you can make things more fancy if 
you want —just use a little imagination. 

You may recall last month (PCM, 
July, Page 19) we created a directory in 
which to store Multiplan and called that 
directory This was on the theory 


that the program deals primarily with 
dollars and cents, and it was something 
that was easy to remember. After we 
created the directory, we moved all the 
Multiplan “programs” into the “$” di¬ 
rectory. 

Whenever we wanted to run Multi¬ 
plan , we just typed CD \$ and we 
“moved” from the main directory to the 
one which held Multiplan. Then, we 
simply ran the program as per the 
instructions. Once we were through, we 
quit Multiplan , typed the command CD 
\ and were back in the main (or root) 
directory of the disk. 

Now, what we want to do is eliminate 
all that remembering and typing. We 
can do that by using a nice little pro¬ 
gram in the MS-DOS system called 
EDLIN. 

EDLIN is a simple line editor. To run 
it, go to the root directory and type its 
name, along with the name of the pro¬ 
gram or procedure that you want to use 
it to create. 

In this case, we selected to be the 
directory for Multiplan because it was 
easy to remember. No reason to change 
things, so let’s just call the procedure we 
will use to get to it “$”, too. 

(You probably know that you cannot 
use two file names that are the same. 
However, when you are dealing with 
different directories you can use the 
same file name in each of any number of 
directories you are using. MS-DOS 
treats each directory as a different disk 
in some ways and that is the reason this 
is possible. As you’ll see, this can be very 
useful.) 

OK, let’s go. You have a directory 
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called with Multiplan programs in 
it. You are in the root directory. Just 
type: 

EDLIN $.BAT 

What you have done is started to run 
the EDLIN program and given the file 
you are creating a name, in this case 
Your 2000 prints the words “New file” 
on the screen and an asterisk (*). The 
asterisk is your prompt to go ahead and 
do something. 

Type the following EDLIN command: 

I 

This puts you in the Insert mode, and 
tells the EDLIN program you are ready 
to begin inserting lines. 

EDLIN responds by typing the line 
number, a colon and another asterisk, 
like this: 

Is* 

Now you are going to type in what 
you want this procedure file to do. 
Immediately following the asterisk, you 
type: 

chdir \$ 

mp 

To get out of the Insert mode you 
hold the CONTROL key down and type a 
‘Z,’ followed by ENTER. Then, type an 
‘E’ and ENTER to get you out of EDLIN 
and back to the “command level.”- 

That’s all there is to this part of it. 
What you have done is to create a 
procedure file which changes the direc¬ 
tory from the root to the directory 
and then runs Multiplan. The name of 
the file procedure file is $. BA T, but you 
can run it from the main directory 
simply by typing in “$” and ENTER. 

Try it. What you will see is that your 
new file changes your directory from the 
root to the directory and then loads 
in Multiplan. All with one keystroke! 

Well, truth be it known, when you 
have finished with Multiplan it is always 
good to save files, that is, make a 
backup. Because we use a hard disk, we 
have two methods of saving, and the 
most simple is just to make a second 
copy of the same file on the hard disk. 
We do this because it is faster and 
because we can always insert a floppy 
and make another backup. We call this 
a secondary backup and do it only once 
in a while on the theory we may ruin a 
single file, but not two of them. 

So, what we need to do is create a 
procedure file not only to make some 
backups, but also to get us back to the 


main directory (after all, once done with 
Multiplan why hang around in its direc¬ 
tory?). 

Just for illustration purposes, let us 
suppose that we have two files that we 
use with Multiplan every day, one called 
SUBS and one called MONTHS. Each 
day we turn on our 2000, type “$” after 
we enter the date and time, and then go 
into the two files, updating information 
based on the number of subscriptions 
and money we get every day. Once fin¬ 
ished, we give Multiplan its QUIT com¬ 
mand and we are back, sitting in the 
directory. 


“What you will see 
is that your new file 
changes your 
directory from the 
root to the '$’ 
directory and then 
loads in Multiplan. All 
with one keystroke!” 


So, now, let’s just create a file that will 
get us back to the root directory and 
save copies of these files at the same 
time. 

Suppose we want to call the backup 
files B-SUBS and B-MONTH, with the 
prefix B- standing for backup. Type in 
the command to change back to the root 
directory (you have to do this because 
EDLIN is only in the root directory) by 
using the now familiar command 
CHDIR \. 

Okay. Back to the root directory. 
Since we are going to use this new 
procedure file primarily to be safe and 
make a copy of existing files, let’s name 
it SAFETY. So, to get into EDLIN we 
type in: 

EDLIN SAFETY.BAT 

We get the “New file” message and 
the asterisk. So, type in the command 1 
(for insert) and note that EDLIN sup¬ 
plies the same numeral 1, the colon and 
an asterisk. Now, we are ready to create 
the new file, so type in the new proce¬ 
dure this way: 

COPY SUBS B-SUBS 

COPY MONTH B-MONTH 

DIR *. 

CHDIR \ 


Now, type a CONTROL Z to get out of 
the insert mode, type an ‘E’ to get out of 
EDLIN and you have a new procedure 
file named SAFETY.BAT. 

But, this procedure file is in the root 
directory (where we created it) and it 
needs to be in the “$”file. Simple matter 
to handle this here, just type the follow¬ 
ing two commands: 

COPY SAFETY.BAT \S\ 
SAFETY.BAT 
DEL SAFETY.BAT 

What you have done is copy the 
procedure file from the root to the 
directory and then deleted the same file 
from the root directory so the root 
directory does not have a lot of addi¬ 
tional clutter in it. 

Your new procedure file will do four 
things; it will: 

Copy MONTH into a file called 

B-MONTH 

Copy SUBS into a file called B-SUBS 

Print out a directory on the screen so 
you can see the copies were, indeed, 
made 

Returns you to the root directory. 

When in the “$” directory, all you 
have to do is type the procedure file 
name SAFETY. All the rest of the work 
will be done for you. 

Now that ypu have these two proce¬ 
dure files, all you need to do to run 
Multiplan on a daily basis is turn on 
your 2000, enter the date and time, and 
type in “$” ENTER. You will be sent to 
the proper directory and Multiplan will 
start up. You do whatever work you 
wish to do in Multiplan , Quit the pro¬ 
gram and type in the word “SAFETY” 
and ENTER . The 2000 will automatically 
make a backup of both files, print a 
directory on the screen and return you 
to the root directory, where you can do 
something else. 

One last pojnt. Remember that we 
said that you could have file names 
which are the same so long as they are 
on different directories? Well, this means 
you could use the name “SAFETY”as a 
backup procedure file on every applica¬ 
tion program you have —just as long as 
each application program is in a direc¬ 
tory all its own. It makes things some¬ 
what easier to remember. 

As you get more familiar with proce¬ 
dure files such as these, you will, no 
doubt, come up with some additional 
things you want them to do. It is easy to 
do so, once you have the basics down, 
and this article should lead you through 
that easily. I giL'j 
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The P0C0-C0C0 
Connection 


M y first home computer was 
a TRS-80 Color Computer, 
which over an approximately 
two-year period grew from a I6K ma¬ 
chine with a cassette recorder and an 
LPVI1 printer to a 64K, two-drive sys¬ 
tem with a DM P-200 printer and a 
modem, a case with no screws left, all 
sorts of funny wires running around 
inside it, and two shiny black thumb 
prints on its base. 

Then, Radio Shack announced their 
fck notebook”computer, the Model 100. I 
played with one a little while, yawned a 
bit, allowed that it was “nice," and 
promptly forgot about it and forged on 
with my Color Computer. Then tech¬ 
nology caught up, and the buzzwords of 
the day were modems, data communi¬ 
cations and multi-computer linkages. A 
little bell went off in my head, remind¬ 
ing me that a lot of those words seemed 
to have been in the Model 100 manual 
that had been so casually laid aside. So, 
back to the manual, and sure enough 
. . . the machine was designed for the 
urges that 1 was attempting to satisfy 
with the Color Computer. So down to 
my friendly Radio Shack salesman and 
the order was in for a 24K Model 100. 

Once 1 got the unit and worked with it 
for a while, 1 was alternately impressed 
and depressed with its capabilities. True, 
it did, and did very well, a lot of things 
that 1 was used to doing. It did have 
excellent built-in software, it did com¬ 
municate easily, it was remarkably easy 
to learn and use. However, it didn’t have 


(Dennis Mitchell is heat! of the business 
software group of Color Software Ser¬ 
vices, a division of Brantex, Inc.) 


^By D.E. Mitchell 

disk storage (how I’ve learned to hate 
cassettes), it didn’t have a good word 
processor, and there was no spreadsheet 
of the capabilities 1 was used to. Now I 
knew that either Radio Shack or a 
third-party vendor would soon provide 
some of these things (and some are 
already here as 1 write this), but 1 was 
eager to use the machine that minute, 
and really didn’t want to put a whole lot 
more money into it. Another little bell 
went off — 1 realized that what the 
Model 100 didn’t do, the Color Compu¬ 
ter did, and vice-versa. Introduce a little 
symbiosis and Voila! — the idea of the 
PoCo-CoCo connection was born. Why 
not connect the two systems so that each 
did the things that they could do the 
best. 

Like any good planning session, the 
first step in setting up something like 
this is to define the goals and objectives. 

What did I really want to do? 1 came up 
with the following: 1 wanted to com¬ 
municate with bulletin boards and tap 
into all that fine camaraderie, knowl¬ 
edge, and shared software. And, 1 want¬ 
ed to pass data back and forth between 
the Model 100 and the Color Computer 
in order to use the CoCo’s disk drives 
for storage of PoCo programs and text 
files, and to be able to use the Color 
Computer word processor for polishing 
my Model 100 scribblings. 

Very gradually, with lots of help from 
friends with varying experience and a 
few more minor purchases, these goals 
have been realized. For those of you 
who might have the same basic setup, or 
might want to take advantage of the 
current ridiculously low prices being 
asked for Color Computers, or might 
even want to transfer the techniques 
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set up another computer as a base 
station for the Model 100,1 will describe 
how the goals were met. I will be using 
the specific names and parameters of 
the software and hardware that I have 
used; however, many equally fine pieces 
ot both should be able to be substituted 
to do the job as well, or better. It is just 
easier for me to describe them using 
terms that 1 have grown familiar with. 

Communicate With Bulletin Boards 

1 had already been doing this with the 
Color Computer before I got the Model 
100, using Eigen Systems COLOR¬ 
COM/E, one of the many communica¬ 
tions software packages available. H ow- 
ever, the auto-find-and-dial capability 
of the Model 100 sure is a lot smoother, 
but the buffer of the 64K Color Compu¬ 


ter is bigger, so 1 find that 1 still alternate 
between which one to use, depending on 
what 1 am looking for. If it involves a lot 
of downloading, the Color Computer 
does it. If it is just board-hopping or 
looking for one or two specific things, 
the vote goes to the Model 100. 

In my ADRS.DO file, 1 have pre¬ 
ceded each bulletin board with the code 
“BBS.” 1 can then use the find feature of 
RELCOM to scan through them until 1 
find one that 1 want to call with the 
CALL function key. 

Transferring Programs And 
Text Files Between The Model 100 
And The Color Computer 

This didn't seem like it would be too 
hard to do, since no phone connections 
were involved, only a direct link by 
cable between the two computers. Radio 
Shack had even anticipated this require¬ 
ment, offering for the mere sum of 
SI 9.95 a cable to join the two (Cat. #26- 
3014). I hooked this cable to the RS-232 
port of the Model 100 and the serial I/O 
port of the Color Computer, powered 
up COLORCOM/E in the CoCo, set 
the parameters on both machines to 
match (more on this later), pushed a 
couple of buttons, and . . . nothing 
happened. 


After a couple of days of experiment¬ 
ing with every conceivable parameter in 
both machines, it was back to Radio 
Shack. It seems that they forgot to 
mention that I needed a null modem 
adaptor ($29.95, Cat. #26-1496). 

“What's a null modem adaptor?'' It's 
not too complex. When you hook the 
Color Computer and the Model 100 
together via the 26-3014 cable, both are 
trying to send and receive signals over 
the same lines. All a null modem adap¬ 
tor does in this case is cross them over in 
mid-stream. If you don’t mind ruining 
this cable for other uses, simply unsolder 
pins 2 and 4 on the four-pin connection 
end or pins 2 and 3 on the 25-pin end, 
switch them around and resolder, con¬ 
nect it up and it should work. They did, 

I did, and it did. 


The only thing remaining was to 
adjust the parameters on both ends for 
compatible data transfer. The fastest 
rate that COLORCOM IE can handle is 
1200 Baud, with the following settings: 

COLORCOM/E 
Baud =1200 
Parity = Even 
Bits = 7 
CR = Normal 
LF=lnsert 
CTL= Pass 
Duplex = Full 

(With the exception of the 1200 Baud 
and insert LF option, all of the settings 
are default values. You may just hit 
ENTER in response to them.) 

Model 100 STAT = 57E1E 
5=1200 Baud 
7 = 7 bit word 
E = Even parity 
1 = 1 stop bit 
E = XON/XOFF enabled 

To link the two computers, simply 
bring COLORCOM /£up in the CoCo, 
set the parameters (Ct 1-5 and L from 
the menu), and hit the Space Bar to get a 
blank screen with the cursor in the 
upper left corner. Put the Model 100 in 


TELCOM mode, STAT as 57E1E, and 
hit function key 4 (TERM). Type a bit, 
and you will see that the two computers 
are “talking.” Use the upload option of 
the Model 100 to pass a file to the Color 
Computer, catch it in the buffer, and 
write it to disk (CTL-5 and option “W”). 
Use the file transmit feature in COLOR¬ 
COM/Eio send a file to the Model 100, 
and catch it in the 100's RAM with the 
download feature. (See the COLOR¬ 
COM/E and Model 100 manuals for 
more detailed instructions on these 
features). 

Once the files have been saved to the 
CoCo’sdisk from COLORCOM/E , they 
are an ASCII text file, and may be 
accessed by an ASCII-based word pro¬ 
cessor or text editor. In my case, since 1 
use Cognitec’s Telewriter-64 with the 
ASCI I file feature for my editor, I write 
the file to disk with a filetype of “DAT” 
(which signifies an ASCII data file to 
Telewriter ), and since 1 have a commun¬ 
ications systems disk in drive 0 and a 
data disk in drive 1, 1 usually add a “: 1 ” 
to the file when saving it. For example, 
to write a received file to a Color 
Computer disk, choose COLOR¬ 
COM/E option “W,” answer “NO” to 
the “Use capture characters” question, 
and name the file NAME.DAT: I. Later, 
when using Telewriter-64 to review and 
clean up the file, you may call it up as 
file NAME: I, the filetype DAT will be 
assumed. 

One thing to remember when trans¬ 
ferring a file from the Model 100 to the 
Color Computer is that for some strange 
reason the Model 100 does not seem to 
transmit a line feed in the upload mode, 
which is why 1 chose the option of 
inserting line feeds in COLORCOM/E. 
When sending a text file and later load¬ 
ing it into Telewriter-64, this will all be 
adjusted by the word processor anyway. 
However, when you send a BASIC pro¬ 
gram (which must first be converted to a 
.DO file in the Model 100 by doing an 
ASCII save), any line feeds inserted in a 
line can play havoc with your program. 
The best way 1 have found around this is 
to specify the widest possible line width 
(132 characters) during the upload. Then 
load the file into Telewriter-64 with the 
characters-per-line set at zero (0) so that 
it does not insert any more line feeds, 
check to see that all lines begin with a 
BASIC line number, delete any unneces¬ 
sary CRs or LFs that may have broken 
up a BASIC line, and resave the file. 

If you can then load it as a BASIC 
program without any “DS” (Direct 
Statement) Errors, you have done very 
well, indeed! rrim 
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"Like any good planning session, the first step in 
setting up something like this is to define the goals and 
objectives. What did I really want to do?” 


Radio Shack’s TRS-80 



Offers You Disk S 


Greater Storage 
Capacity and Faster 
Access to Data 

The Model 100 Disk/Video Interface 
features a built-in single-sided, 
double-density 184K disk drive to let 
you create, store and retrieve files 
quickly and easily. You'll find it 
much faster and more reliable than 
cassette storage. When you’re 
ready to hit the road again, just load 
the files you need into your 
Model 100 and take off. 


The Revolution 
Continues 


Our Model 100 Portable Computer’s 
built-in software and easy portability 
started a revolution in the way 
America computes. Professionals of 
all kinds—managers, reporters, 
ambulance drivers—have found the 
Model 100 a valuable tool they can 
use anytime, anywhere. Now, with 
the TRS-80 Model 100 Disk/Video 
Interface, you can turn your 
Model 100 into a versatile disk- 
based home or office system, too! 








* Model 100 Computer 
torage and Video! 


Attaches Easily to Any 
Television 

The Disk/Video Interface also lets 
you enjoy a big 40-character by 25- 
line screen display on any TV. The 
larger screen is perfect for writing 
notes and reports or developing 
your own programs in BASIC. 
When accessing data by phone, 
you can read a full 25 lines of infor¬ 
mation without scrolling. And you 
can utilize all of Model 100’s graph¬ 
ics characters. 


No Computer Wizardry 
Required 

It couldn’t be easier to use. Just 
plug the Disk/Video Interface into 
an AC outlet, connect your TV and 
a Model 100 with a minimum of 
16K—all cables are included. One 
simple command switches all the 
output to the video screen. There's 
no new operating system to learn, 
either—the command structure is 
exactly the same. 


Easily Expandable 

You can add a second 184K disk 
drive (#26-3807, $239.95*) to the 
Disk/Video Interface for even more 
versatility. Best of all, the Disk/ 
Video Interface doesn’t use any of 
Model 100’s standard connectors, 
so you can add a printer, bar code 
reader, RS-232C communications 
device or cassette recorder. You 
can make your Model 100 a high- 
performance desktop system. 





Get Down to Business With an 80-Column Display 


A Compact Office 
System 

The Disk/Video Interface can turn 
your Model 100 into a professional 
desktop system for the office, too. 
With any standard video monitor, you 
get a large 80-character by 25-line 
display that’s equal to other desktop 
computers. You’ll also get the rapid 
access to files and storage reliability 
that are so necessary in today’s busi¬ 
ness world. 


Come In Today 

The TRS-80 Disk/Video Interface, 
along with our complete line of 
Model 100 accessories, is available 
coast to coast. 

Available at over 1100 
Radio Shack Computer Centers and at 
participating Radio Shack stores and dealers 

Radio /hack 

COMPUTER CENTERS 


A DIVISION OP TANDY CORPORATION 

Perfect “Second System” 

A disk-based Model 100 system is an 
economical alternative to a second 
office computer. And you’ll still have 
the advantage of portability when you 
need it. 


AS LOW AS 


* Installation not included Prices apply at participating Radio Shack 
stores and dealers. TRS-80 Model 100 P Disk/Video Interface and TV 
sold separately. CitiLine is a service mark ot Citicorp. 



Senri me a free TRS-80 Computer Catalog, 

Mail To: Radio Shack, Depl. BS-A-13 
300 One Tandy Center, Fort Worth, TX 70102 

NAME___ 

ADDRESS_____ 

CITY,___ 

STATE_, ZIP -___ 

TELEPHONE___ 

I_-_—----I 
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W e have all seen 3-D graphics on 
CRT’s but here is a little program 
that puts 3-D on the Model 100’s LCD. 
And it only uses 612 bytes of RAM to 
do it. 

The k X’ loop draws the function. The 
T’ loop establishes the 3-D effect by 
plotting the‘X’function from a different 
angle each run. 

Since the function is symmetrical, 
being drawn around a common center, 
it only has to be drawn through 180 
degrees of rotation. Further, the func¬ 
tion and its compliment are drawn 
simultaneously, therefore it is only re¬ 
quired to go through 90 degrees which 
cuts generation time in half. It takes 
about three minutes 43 seconds to com¬ 
plete “S1NC,” three minutes 16 seconds 
to complete the “COSIN” and five min¬ 
utes three seconds to complete the 
“HAT.” 

The formulas used in this program 
are, basically, X’= XCOSO and Y’= Y + 
XSINO where X and Y are individual 
points on the actual graph plan and X’ 
and Y’ are coordinates on the view 
plane. Theta (0) is the angle between 

these two planes. „ 

— K.W. Klages 


Program by 
Jon P. Klages 
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The listing: 


10 'BRAF3D.BA, AUTHOR JON P. KLAGES, (61 
2 BYTES) 

20 CLS:PRINT:PRINT SPRINT "1=SINC 2 = C0S 3 
=HAT" 

30 PRINT:PRINT "WHAT FUNCTION ?" 

40 A$ = INKEY$: IF A$=""THEN 40 
50 IF VAL(A$)=1 THEN GND=35: GOTO 90 

60 IF VAL(A$)=2 THEN GND=25: GOTO 90 

70 IF VAL <A$)=3 THEN GND=25: GOTO 90 

80 GOTO 20 

90 PI-3.141591 P=239/2: Z=.2:CLS 


100 FOR T=0 TO PI/2 STEP PI/31 

110 G=C0S(T): C=-P*G+P 

120 H=SIN(T)s D=GND+P*Z*H 

130 FOR X—P TO P STEP 5 

140 IFVAL(A$)=1 THEN Y=4*PI*X/P: Y=20 * 

SIN(Y)/Y 

150 IFVAL(At)*2 THEN Y=20 * COS<1.5*PI*X 
/P> 

160 IFVAL(A$)=3 THEN Y=1.5 # PI * X/P: Y 
= 18 * (COS<Y) -.4*C0S(3*Y)) 

170 A=X*G+P 

180 B=GND-Y-Z*X*H 

190 IF T=0 AND X>1 THEN GOTO 230 

200 LINE (C,D)-(A,B) ,1 

210 LINE (239-C,D) — <239—A,B),1:C=A:D=B 

220 NEXT X 

230 NEXT T 003 
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Gemini 
10X Printer 

(does not include cable) 



Mini-Modem 

(includes cable) 


C-10 Cassette 
Tapes 


5 V 4 " Diskettes 


Rainbow Connection BBS 

BBS #1 (212) 441-3755 

2 (212) 441-3766 

3 (212) 441-5719 

4 (212) 441-5907 

5 (408) 984-7937 


f jitggg 

see us at /t PRINCETON 



WEST DIVISION 

Spectrum Projects 

PO Box 9866 Add $3.00 S/H 

San Jose, CA 95157-0866 NY Res Add Tax 


$ 299.95 

$ 79.95 

$.49 

each 

$ 1.99 

each 


Model 100 
■ download 
available on 
J these lines 


3T DIVISION 

Spectrum Projects 

PO Box 21272 
Woodhaven, NY 11421 



dBASE Tutor 


Part III-Files Of A 

Different Sort 


By Danny Humphress 
PCM Technical Editor 


T here is some exciting news on the 
dBASE front. Ashton-Tate, devel¬ 
opers of dBASE II, have begun 
deliveries of its new enhanced version of 
dBASE, dBASE III. dBASE III adds 
several new features to our familiar 
dBASE II including an “Assist” feature 
that allows you to breeze through the 
program with the menus and help 
screens. Other major features include a 
new maximum database size of two bil¬ 
lion records(v.s. dBASE IPs65535)and 
the ability to work with ten database 
files at a time (dBASE II allowed two). 
The disappointing news for us Tandy 
2000 users is that the current version 
will work only on the IBM PC, PC/XT, 
PCjr and 100 percent compatibles. We 
expect a Tandy 2000 version soon. 

dBASE II remains alive and vital. It 
will continue as the “standard” for 8-bit 
CP/M computers and an important 
part of Ashton-Tate’s software line for 
16-bit MS-DOS computers. 

This column will continue to focus on 
dBASE II. Perhaps when dBASE III is 
readily available for the Tandy 2000, 
well incorporate it into dBASE Tutor. 
But for now, it’s on to the miracles of 
dBASE II . . . 

Over the past two months we’ve cre¬ 
ated a small database, added records to 
it, listed it, located records, and edited 
records. This month we’re going to sort 
our list and learn why we don’t have to 


sort. We’ll also learn a quick way to find 
records without having dBASE search 
through the entire list. 

We’ll be using the database called 
“Mail” that we created in the first part 
of dBASE Tutor. If you’re just joining 
this series (or you lost your disk from 
two months ago), Figure 1 has the struc¬ 
ture and data for the file. 

It is usually desirable to have infor¬ 
mation in a database in some order. In a 
short list such as ours, it is not so impor¬ 
tant, but imagine having to look through 
1,000 items in an inventory file listing to 
find a single item. You might as well 
throw out the computer and go back to 
the card file system. Well, that’s not a 
problem with dBASE II. 

dBASE II provides a way to make a 
copy of a database file sorted in any 
manner you like. The command to do 
this wondrous thing is SORT. SORT 
takes the current database file in use and 
copies it to a new sorted file. 

Enter these commands: 

USE MAIL ENTER 

SORT ON NAME TO MAIL2 ENTER 

The first line, of course, tells dBASE 
II to use the “Mail” database file. The 
second line sorts the current file by the 
“name” field and creates a new database 
called “Mail2”to contain the sorted list. 
The current database file has not been 
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FIELD NAME TYPE LENGTH DECIMAL 


Figure 1 

NAME 

STREET 

CITY 

STATE 

ZIP.CODE 

TELEPHONE 

YTD:SALES 

I 

PCM 

9529 U.S. Highway 42 
Prospect, KY 40059 
(502) 228-4492 
5100.50 

3 

Portable Computer 
Support Group 
11035 Harry Hines Blvd. 
Dallas, TX 75229 
(214) 351-0564 
1000.00 

5 

B.T. Enterprises 
10 Carlough Road 
Bohemia, NY 11716-2996 

7 

Dr. Preble’s Programs 
6540 Outer Loop 
Louisville, KY 40228 
5000.00 

9 

Prickly-Pear Software 
9234 E. 30th Street 
Tucson, AZ 85710 
(606) 886-1505 
7000.00 

II 

Purple Computing 
2068 Ventura Blvd. 
Camarillo, CA 93010 
(805) 987-4788 
9000.00 

13 

Dennison 
82 Calvary Street 
Waltham, MA 02154 
(800) 343-8413 
11000.00 


C 35 

C 35 

C 20 

C 2 

C 10 

C 13 

N 10 2 

2 

Radio Shack 
300 One Tandy Center 
Fort Worth, TX 76102 
(no telephone number) 
123456.78 

4 

Computer Plus 
480 King Street 
Littleton, MA 01460 
2000.00 

6 

Chattanooga Choo Choo 
P.O. Box 15892 
Chattanooga, TN 37415 
4000.00 

8 

Computer Solutions Co. 
901 Embassy Square Blvd. 
Louisville, KY 40299-1814 
(502) 491-6122 
6000.00 

10 

Skyline Marketing Corp. 
4510 W. Irving Park Road 
Chicago, IL 60641 
(312) 286-0762 
8000.00 

12 

Spectrum Projects 
4285 Payne Avenue #9866 
San Jose, CA 95117 
(212) 441-2807 
10000.00 

14 

Traveling Software, Inc. 
11050 Fifth Avenue NE 
Seattle, WA 98125 
(800) 343-8080 
12000.00 


changed at all. See for yourself — list 
the names by typing: 

LIST NAME ENTER 

The list you’ll get will be in the order 
the names were entered — not in alpha¬ 
betical order. The sorted list is in the 
new database called “Mail2.” Tell 
dBASE 11 to use this file by entering 
this: 

USE MAIL2 ENTER 

dBASE II is now using the sorted file 
that SORT created. Now try the LIST 
command: 

LIST NAME ENTER 

The list will be in alphabetical order 
by the “name” field. See Figure 2. 

Now try this: 

USE MAIL ENTER 

SORT ON CITY TO MAIL2 ENTER 

The “MaiI2”file will now be sorted by 
the “city” field. Let’s take a look. 

USE MAIL2 ENTER 

LIST NAME,CITY ENTER 

We told dBASE to use the “Mail2” 
file and list the names and cities of all 
the records. The records should now be 
in alphabetical order by city. Isn’t that 
easy? 

Remember, SORT does not sort the 
file you're currently using, but rather it 
makes another copy of the fiie in sorted 
order. If the file you specify with the 
SORT command already exists, it will 
be erased and overwritten with the new 
information. It is very important that 
you are absolutely sure of what you’re 
doing when you use SORT. It is very 
easy to forget, as in the above examples, 
that you already have a “Mail2” file that 
you don’t want erased. Once you press 
ENTER, it’s too late. 

You Don’t Need To Sort! 

That’s right, you don’t need to sort. 
SORT is a nice function to have, but 
there are better ways of getting data in 
order. There are many disadvantages of 
SORT — all of which are overcome 
with another more powerful command. 

To begin, SORT is time consuming. 
If you make any changes that would 
affect the way the data is sorted such as 
adding, deleting, or editing records, you 
have to sort the entire file again. 


SORT wastes disk space. You have to 
sort to a different file. Of course, you 
could always erase the original file, but 
not until the new sorted file has been 
created. At one point, you must have 
two copies of the file on the disk. 

One major problem is SORT’S inabil¬ 
ity to have the data sorted in more than 


one order. In our “Mail” file, we may 
want the data in name order for reports, 
but also in ZIP code order for mass 
mailing. The only way to do this would 
be to re-sort the file each time you 
wanted to access it in a different order. 

Another drawback is that, with a 
large file, we still have to search through 
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the entire file with LOCATE when we’re 
looking for a single record. Even if the 
file is sorted, dBASE starts with the first 
record and continues until it finds a 
matching record with LOCATE — very, 
very slowly. 

There is an answer to all these prob¬ 
lems — INDEX. The INDEX com¬ 
mand creates an “index” to the database 
file. Much like the index at the end of a 
book allows you to find page numbers, 
INDEX helps dBASE find record num¬ 
bers. The datafile is not physically sorted, 
but another “index” file is created that 
“points” to records in the database. Try 
this: 

USE MAIL ENTER 

INDEX ON NAME TO MAILNAME ENTER 


A file called “MA1LNAME.NDX” is 
created on the disk that has information 
about the “logical order” of the records 
in the “Mail” database. Now list the 
names in the file: 


Figure 2 


. LIST 

NAME 

OOOOl 

B.T. Enterprises 

00002 

Chattanooga Choo Choo 

00003 

Computer Plus 

00004 

Computer Solutions Company 

00005 

Dennison 

00006 

Dr. Preble's Programs 

00007 

PCM 

00008 

Portable Computer Support Group 

00009 

Prickly-Pear Software 

00010 

Purple Computing 

00011 

Radio Shack 

00012 

Skyline Marketing Corp. 

00013 

Spectrum Projects 

00014 

Traveling Software, Inc. 


different database file, so it turned off 
the index. List the names: 

LIST NAME ENTER 


adapting a different form of the USE 
command: 

USE MAIL INDEX MAILNAME ENTER 


LIST NAME ENTER 

Notice that the records appear in 
“name” order. But are they really? Look 
at the record numbers (Figure 3). The 
records were only displayed in order, 
they are actually still in the record 
number order. To turn off the index, 
type: 

USE MAIL ENTER 

The index is still on the disk, but as 
far as dBASE II knows, we’re using a 


The names are still in the record 
number order. We don’t need to go 
through the indexing again to get them 
back to name order, we just need to turn 
on the index. Type: 

SET INDEX TO MAILNAME ENTER 

LIST NAME ENTER 

The first line told dBASE to use the 
“Mailname” index for this file. We can 
also tell dBASE which index to use as 
we tell it which database file to use by 


This is a short way of telling dBASE 
to use the “Mail” file with the “Mail- 
name” index. It does exactly the same 
thing as the two-liner above. 

Last month, we used LOCATE to 
find a record in the database. If the file 
in use is indexed on the field that you’re 
looking for, such as “name,” there is a 
much more efficient way. FIND uses 
the index to rapidly locate a particular 
record. No matter how large the data¬ 
base, FIND will locate a record in a 
matter of a few seconds or less. The only 
drawback is that you can only use it for 
the field that the database is indexed on. 
Try this: 

FIND “Radio Shack” ENTER 

DISPLAY ENTER 

The record with “Radio Shack”as the 
name was found very rapidly using the 
index. DISPLAY put the information 
for the record on the screen. 

This is one very important feature of 
dBASE. With just a single command, 
you can quickly locate any record from 
thousands if the database is indexed 
accordingly. 

Try this: 

FIND “Sears” ENTER 

Since “Sears” is not in our database 
file, FIND reports a “NO FIND” 


Figure 3 


. LIST 

NAME 

00005 

B.T. Enterprises 

00006 

Chattanooga Choo Choo 

00004 

Computer Plus 

OOOOB 

Computer Solutions Company 

00013 

Dennison 

00007 

Dr. Preble's Programs 

OOOOl 

PCM 

00003 

Portable Computer Support Group 

00009 

Prickly-Pear Software 

00011 

Purple Computing 

00002 

Radio Shack 

00010 

Skyline Marketing Corp. 

00012 

Spectrum Projects 

00014 

Traveling Software, Inc. 


34 PCM August 1984 






Figure 4 


. LIST 

NAME,ZIP:CODE 


00004 

Computer Plus 

01460 

00013 

Dennison 

02154 

00005 

B.T. Enterprises 

11716-2996 

00006 

Chattanooga Choo Choo 

37415 

00001 

PCM 

40059 

00007 

Dr. Preble's Programs 

40228 

00008 

Computer Solutions Company 

40299-1814 

00010 

Skyline Marketing Corp. 

60641 

00003 

Portable Computer Support Group 

75229 

00002 

Radio Shack 

76102 

00009 

Prickly-Pear Software 

85710 

00011 

Purple Computing 

93010 

00012 

Spectrum Projects 

95117 

00014 

• 

Traveling Software, Inc. 

98125 


message. 

Like LOCATE, FIND will allow you 
to specify just a few characters to locate 
a record. For instance, “Chattanooga 
Choo Choo” is the only record in the file 
that begins with “Chat,” so we could 
also do this: 

FIND “Chat” ENTER 

dBASE will find the first (or only) 
record that begins with “Chat.” This 
makes it very convenient to find a long 
name without having to type the entire 
name. 

Another major advantage of INDEX 
over SORT is that you don’t have to 
continually re-sort the file any time you 
add, delete, or edit a record. As long as 
you have the index turned on, it is 
updated automatically any time you 
fiddle with the data. 

Try this: 

FIND “Purple Computing” ENTER 

EDIT # ENTER 

Change the name to “Yellow Com¬ 
puting” while in the edit mode. Now 
type: 

LIST NAME ENTER 

The new “Yellow Computing” has 
moved to a new position in our indexed 
list! Neat, huh! Type: 

EDIT# ENTER 

Change the name to “Purple Com¬ 


puting” while in the edit mode to please 
the good folks in Camarillo, California. 

dBASE allows you to have more than 
one index for a file. Suppose we wanted 
to have the data sorted by “name” and 


“Another major 
advantage of INDEX over 
SORT is that you don’t 
have to continually re¬ 
sort the file any time you 
add, delete, or edit a 
record. ” 


by ZIP code. This would be impossible 
using SORT, but it’s a simple thing for 
INDEX. Type this: 

INDEX ON ZIP TO MAILZIP ENTER 

The “Mailname” index is still on the 
disk, but a new index has been created 
with the data sorted by ZIP code. List 
the names and ZIP codes to see for 
yourself: 

LIST NAME,ZIP:CODE ENTER 

The list will be in order of ZIP code 
(Figure 4). 

If we make changes to our database 
file now, the “Mailzip” index will be 
updated — but not the “Mailname” 
index. This problem is easily overcome 


by using two indexes at once. Only the 
first index you specify will be used for 
finding data and listing data, but the 
other index or indexes will be kept up to 
date any time changes, additions, or 
deletions are made. You can specify 
more than one index with the “SET 
INDEX TO” command if the file is 
already in use or when you open the file 
with the “USE” command: 

SET INDEX TO MAILNAME,MAILZIP 

This would cause the “name” index to 
be the main index. You can use FIND to 
locate names and commands such as 
LIST will output the data in name 
order. Any time a change is made, the 
ZIP code index is updated. You could 
also say: 

USE MAIL INDE MAILNAME,MAILZIP 

This works the same as the above 
example except it opens the file at the 
same time. 

When you want the data in ZIP code 
order, just put the ZIP code index first: 

USE MAIL INDE MAILZIP,MAILNAME 

The ZIP code index is the main index 
now, and the name index just tags 
along. 

As you can see, dBASE II packs in a 
lot of guts on mild mannered floppy 
disk. We’ve only just begun, my friends! 
Over the next several months, we’ll dis¬ 
cover even more of the power of dBASE 
II. Stay tuned . . . 
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C ontinuing our series showcasing 
the beautiful graphics capabili¬ 
ties of the Tandy 2000, this 
month we present the flag affectionately 
known as “Union JackTthe flag of the 
United Kingdom. 

The British Hag interestingly com¬ 
bines symbols of England* Scotland, 
and Ireland. The red cross of St. George 
was a national symbol of England since 
the 1200s. A white ‘X' cross on a blue 
field, St. Andrew's cross, was a long 
time symbol for Scotland, St. Patrick's 
cross* a red L X’ona white background, 
was associated with Ireland. Together* 


these three symbols create a truly origi¬ 
nal national flag. 

This program reproduces the United 
Kingdoms flag on the color monitor of 
your Model 2000, If you have a CGP- 
220 color ink jet primer, you may use 
the CGPDMP.BiN utility from your 
MS-DOS disk to print the flag in full 
color. 

To use CGPDMP, change the first 
line of the program to read: 

1000 SP=I 

If you're using CGPDMP , you'll need 
to reserve memory when you enter 


basic from MS-DOS. Use the follow¬ 
ing command line to get into basic: 

BASIC/M:&HFFO0 

The Flag of the Month Club is always 
interested in the fruits of your creative 
work. Choose a flag you find interesting 
or challenging to reproduce, perhaps 
your state flag* and write a program to 
draw it. Send it to use so we can share it 
W'ith the world — we'll give you credit. 
Each time you do, you'll learn new little 
graphics programming techniques that 
will always be valuable. 


The listing: 




lOOO 

5P=0 




1010 

IF SP 

THEN CePDMP-ScHFFGOi BL 0 AD H CBPDMP. BIN" -CBPDMP 



1020 

SCREEN 3:PALETTE 1,4:PALETTE 7,15:PALETTE 4,1 



1030 

CLS:KEY OFF 



1040 

LINE 

(0,0) — <639,399>,4,BF 



1050 

LINE 

(0,0)—<0,40)*7 



1060 

LINE 

(0,0)—(0,40),7:LINE -(599,39?),7:LINE -(639,399) 

,7 


1070 

LINE 

-(639,359),7:LINE -(40,0),7:LINE -(0,0),7:PAINT 

<1. 

1),7,7 

1000 

LINE 

(639,0)-(599,0),7iLINE -(0,359),7:LINE -(0,399), 

7:LINE -(40,399),7 

1090 

LINE 

-(639,40),7:LINE -(639,0),7:PAINT(633,1),7,7:PAINT 

U,399),7,7 

1100 

LINE 

(0,0)—(0,30),1:LINE -(294,205),1:LINE -(320,190) 

,1 


mo 

LINE 

-(5,0),1:PAINT (1,1),1,1 



1120 

LINE 

(639,399)-(639,369),1:LINE - (345,195),11LINE -(320, 

210),1 

1130 

LINE 

-(635,399),1:PAINT (63B,399),1,1 



1140 

LINE 

(639,0)—(614,0),1:LINE -(320,180),1:LINE -(340,200) 

,1 

1150 

LINE 

-(639,20),1:PAINT (638,1),1,1 



1160 

LINE 

(0,399)—(30,399),1:LINE -(320,220),1:LINE -C300, 

200),1 

1170 

LINE 

-(0,380),1:LINE -(0,399),IsPAINT (1,399),1,1 



neo 

LINE 

(260,0)-(380,399),7,BF 



1190 

LINE 

(0,155)-(639,245),7,BF 



1200 

LINE 

(275,0)-(365,399),1,BF 



1210 

LINE 

(0,165)-(639,235),1,BF 



1220 

LINE 

(0,O)—(639,399),0,B 



1230 

IF SP 

THEN CALL CGPDMP (ER7.) 



1240 

□OTO 

1240 
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On The Road 


Logging Your 
Paycheck 
Can Be Helpful 
Down The Road 

By Robert Frowenfeld 
PCM Contributing Editor 



I t seems as if all I ever do is write 
programs for everyone. Everyone 
else but me, that is. 1 think 1 could 
safely say that in all my years of pro¬ 
gramming, I’ve written maybe five or 
six programs for myself. So you can 
imagine that those few would satisfy a 
very real need. In this month's “On the 
Road," I’ll share with you one of these 
little “gems." Its a program to help you 
keep track ofyour paychecks. In doing 
so, it also monitors up to eight different 
payroll deduction categories. 

One of the interesting features of this 
program is the fact that it will also work 
on your Model II, 12 or 16 computer. If 
you will notice on Line 2 of the accom¬ 
panying listing, the variable MD is set 
equal to 100 (for the Model 100). 

If you change this line to read: 2 
M D= 16 (etc.), you can get this program 
to run on your Model II, 12 or 16 with¬ 
out any modifications at all! If you 
decide to do this you'll find the results 
very attractive. Unlike many “modified" 
programs that just place the display in 
upper left corner of the Model H's 
screen, this one will put the display in 
the middle of the CRT, surrounded by 
an attractive block graphics border. 

Now, for the working of PAY.BA, 
that's what I’ve called this handy little 
program. As you can see from the main 
menu, you can input or edit a record, as 
well as display or print category totals. 


(Robert Frowenfeld owns his own 
computer programming firm in Louis¬ 
ville, Ky., and has completed his gradu¬ 
ate course work in computer science at 
the University of Louisville.) 


One quick note before you get started 
on this program. You must first use the 
TEXT program on your Model 100 to 
create a file named PA Y.DO ; simply 
type in an asterisk (the character *) and 
press the F8 key to get back to the 
Model 100's main screen. The asterisk 
tells PA Y. BA where the end of the data 
file is. 

If you’re running on a Model 2, 12 or 


“One of the 
interesting features 
of this program is the 
fact that it will also 
work on your Model 
II, 12 or 16 
computer.” 


16 you will likewise have to create an 
output file. To do this, run this little 
program: 

10 OPEN “0",1,“PAY/ DAT" 

20 PRINT #l,“*":CLOSE:END 

The first option of PA Y.BA lets you 
input your gross salary along with fed¬ 
eral, state and social security deduc¬ 
tions. You can see in Line 60 the data 
values for four other optional deduction 
categories. They have been set up for 
you as Ded #1 through Ded #4. If you 
wish to give these other names, just 
retype Line 60. You can even eliminate 
some or all of them by entering two 
quotes (“") for a field title. In this case. 


you will not be asked for input in these 
fields. 

Option 2 lets you edit a record. All 
you have to do is enter the date of the 
check (be careful, 1/1 / 84 is not the same 
as 01 /01 / 84) and it will be displayed on 
the screen for you to edit. The editing 
routine is very handy. First of all, the 
record number and net pay are dis¬ 
played for you. The net pay feature is 
nice; it lets you verify that your gross 
salary minus deductions matches your 
net pay. When editing, just select the 
field number (0 to 9) and retype the 
value. 1 think you’ll find this a very 
handy feature. 

To give you your year-end totals, use 
option 3. Your year-to-date totals will 
be displayed almost instantly. This will 
certainly be helpful down the road, say 
around April 15! Oh yes, one more note. 
On Line 2, you will notice the variable 
NN is set equal to 24. That’s because 1 
get 24 paychecks each year. If you get 
paid weekly, you’ll want to change this 
to 52, etc. Using 24 instead of 52 saves 
memory, because as you can see in Line 
35, the DIM statement dimensions the 
various fields accordingly. Therefore, 
while having NN set to a higher value 
doesn’t hurt anything, there’s no need to 
use more memory than you have to! 

Finally, the fourth option will direct a 
listing of each paycheck (along with 
deductions and totals for the end of the 
year) to your printer. I’ve set this up to 
fit into 80 columns, so you don’t need a 
wide carriage to print it. 

There you have it! Use it and enjoy. 
And may all your paychecks be deserv- 
ingly large! 
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Figure 1 
Main Menu 

PCM Paycheck Manager 
Records on File: 0 

1 Input Paycheck 

2 Edit Paycheck 

3 Display Totals 

4 Print Totals 

5 End Program 
Select: 


Figure 2 

Adding a new record (paycheck) 


Input Paycheck 
Last Record Entered: (#0) 


Date:1/31/84 

Check 

#: 

43532 

Gross: 

1732.50 

Ded 

*1: 

0.00 

Fed Tax: 

345.85 

Ded 

#2: 

0.00 

St. Tax: 

79.40 

Ded 

#3: 

0.00 

FICA: 

121.28 

Ded 

#4: 

0.00 

Ent 

try Correct 

< Y / N) 

• 



Figure 3 

Editing an existing paycheck 

Record #1 Edit Paycheck Net: 1185.97 
Last Record Entered: 1/31/84 (#1) 


0 Date:1/31/84 5 Check #:43532 


1 

Gross: 

1732.50 

6 

Ded 

#1: 0.00 

2 

Fed Tax: 

345.85 

7 

Ded 

#2: 

0.00 

3 

St. Tax: 

79.40 

8 

Ded 

#3: 

0.00 

4 

FICA: 

121.28 

9 

Ded 

#4: 0.00 

Enter field 

to edit 

, or 

'FI 

' to exit: 


The listing: 


1 CLEAR 500:CLS:DEFSTR A,R,U:DEFI NT I-N 

2 MD=100:NN=24 

3 GOTO 15 

4 FOR 1=0 TO 7:IR=I:IC=0:A=BL$+" ":G0SUB 


Plot Against Your Competition! 

with QuickPlot® 


COMPANY XY2 - 1982 


NONTHLY SALES ANALYSIS 



JAN FEB tlAR APR NAY JUN JUL AUG SEP OCT NOU DEC 

BEAST COAST SCENTRAl 

LOCATION 

mmO-UEST HUEST COAST 


We’ve just given the CGP-115 Color 
Plotter business status. With Quick- 
Plot, your TRS-80 or IBM-PC can 
produce high quality line-, bar-, and 
pie-charts in vivid color. Simple data 
entry and flexible chart formatting 
makes QuickPlot and the CGP-115 
Color Plotter the logical choice for 
the professional who wants to plot 
his profits—not spend them. 

Q3S 

CERTIFICATION 

SEAL 


Complete QuickPlot Package Model 11/12/16.$89 

Includes: Bar Chart, Pie Chart, Model 111/4 .$89 

and Line Graph. Data and chart Model 100.$49 

formats save to disk for future IBM-PC/XT.. . $89 

plotting. 


Now you have a friend in the software business. 

901 Embassy Square Blvd. 
Louisville, KY 40299 
(502) 491-6122 


C O M P U T E n 

Z30LUTI0NZ3 


TRS-80 and CGP-115 are registered trademarks of Tandy Corporation. PC and 
PC/XT are registered trademarks of IBM Corporation. 


Call or write to place your order or send for free 
information. 
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8:NEXT I:RETURN 'clear screen 

5 MD=16:GOTO 15 

6 X=0;Y=0:IF ABS(FL) = 1 THEN IN$=INPUT$(1 
) ELSE LINE INPUT INI 

7 X=VAL(INI):IF INIO"" THEN Y=ASC(INI): 
RETURN ELSE RETURN 

8 IF MD=16 THEN PP =(IR+8)*80+IC+20 ELSE 
PP=IR*40+IC 

9 PRINTSPP,A;:RETURN 

10 IF MD=16 THEN PP=(IR+8)*80+IC+20 ELSE 
PP=IR*40+IC 

11 PR INTSPP,USING"#####.##";X;:RETURN 

15 IF MD=16 THEN R=CHRI(26):U=CHRI (25) E 
LSE IF MD = 100 THEN R=CHRI<27>+"p":U=CHRI 
(27)+"q" 

20 IF MD=16 THEN IR=-1:IC=-1:A=CHRI<128) 
+STRINGI(40,150)+CHRt(129):GQSUB 8:F0R I 
= 1 TO 8:IR = I-1sIC=-1:A=CHRI(148)+STRINGI 
(40," ")+ CHRI(148):GOSUB 8:NEXT IsIR=8:I 
C=-1:A=CHRI(131)+STRINGI(40,150)+CHRI(13 
0) : GOSUB 8 

25 IF MD= 16 THEN EEI="*" ELSE EEI="F1":K 
EY 1 ,"*"+CHRI(13) 

30 BLI=STRINGI(39," ") 

32 NN=24 

35 DIM GR(NN),FT(NN),ST(NN),D1(NN),D2(NN 
) ,D3(NN>,D4(NN),DTI(NN),CKI(NN) ,SS(NN) 

50 DATA "Input Paycheck", "Edit Paycheck" 

,"Display Totals","Print Totals","End Pr 
ogram" 

55 FOR 1=1 TO 5:READ M0l(I):NEXT I 
60 DATA " Gross","Fed Tax","St. Tax"," 
FICA"," Ded #1"," Ded #2"," Ded #3"," 
Ded #4", "Net" 

65 FOR 1=1 TO 9:READ DEI(I):NEXT I 
90 GOSUB 1000 
100 GOSUB 4 

110 IR = 0:109: A = R + " PCM Paycheck Manager 
" + U:GOSUB 8 

120 FOR 1=1 TO 5:IR=I+1:IC=12:A=R+STRI(I 
) + " " + U + " "+M0I(I)s GOSUB 8:NEXT I 
125 IR=1:IC=11:A="Records on File:"+STRI 
(IX): GOSUB 8 

130 IR = 7:IC=16:A="Select: ":GOSUB 8 
140 A=INPUTI<1>:X=VAL(A):IF X<1 OR X>5 T 
HEN 130 

150 FX=X:ON FX GOTO 200,300,400,500,600 
200 'input 

205 A1 = R +" "+M0l(FX)+" " + U:GOSUB 800 
210 GOSUB 700:GOSUB 760 

212 DTI="":CKI="":GR=0:FT=0:ST=0:D1=0:D2 
=0: D3=0:D4 = 0 

215 GOSUB 230:IF INI="*" THEN GOSUB 1100 
: GOTO 100 ELSE IR=7:IC=0:A=BLI:GOSUB 8:6 
OSUB 235:GOSUB 240:GOSUB 245:G0SUB 250: G 
OSUB 255:GOSUB 260:GOSUB 265:G0SUB 270:6 
OSUB 275:GOTO 280 

230 IR = 2: IC=12:A="":GOSUB 8:G0SUB 6 
232 IF DTI="" AND INI="" THEN 230 ELSE I 
F INI< >"" THEN DTI = INl 


233 IR=2:IC=12:A=STRIN6I(8," "):GOSUB 8: 

A=DTI:GOSUB 8:RETURN 

235 IR=2:IC=32:A="":GOSUB 8:G0SUB 6 

237 IF CKI ="" AND INI="" THEN 235 ELSE I 
F IN$< >"" THEN CKI=INI 

238 IR=2:IC=32:A=STRINGI(7," ")s GOSUB 8: 
A=CKI:GOSUB 8:RETURN 

240 IR=3:IC=12:A="":G0SUB 8:G0SUB 6 

242 IF GR=0 AND IN$="" THEN 240 ELSE IF 
IN$< )•"" THEN GR = X 

243 IR = 3:IC=12:X = GR:GOSUB 10:RETURN 
245 IR=4:IC = 12:A = "":G0SUB 8:G0SUB 6 

247 IF FT=0 AND INI="" THEN 245 ELSE IF 
INI< >"" THEN FT = X 

248 IR=4:IC=12:X=FT:GOSUB 10:RETURN 
250 IR=5:IC=12:A="":G0SUB 8:G0SUB 6 

252 IF ST=0 AND INI="" THEN 250 ELSE IF 
INIO"" THEN ST = X 

253 IR=5:IC=12:X=ST:GOSUB 10:RETURN 
255 IR=6:IC=12:A="":GOSUB 8:G0SUB 6 

257 IF SS=0 AND INI="" THEN 255 ELSE IF 
IN$< >"" THEN SS = X 

258 IR = 6:IC=12:X = SS:GOSUB 10:RETURN 

260 IF DEI(5)="" THEN RETURN 

261 IR=3:IC=32:A="":G0SUB 8:GOSUB 6 

262 IF D1=0 AND IN!="" THEN 260 ELSE IF 
IN$<>"" THEN D1=X 

263 IF DEI(5)="" THEN 260 ELSE IR = 3:IC=3 
2:X = D1:GOSUB 10:RETURN 

265 IF DEI(6) ="" THEN RETURN 



The Handicapper ^ 

Use the power and portability of your Model 100 to 
improve your performance at the track—and we mean 
at the track! The Handicapper comes with separate 
programs for thoroughbred and harness tracks that 
apply sound handicapping techniques to produce 
rankings for the horses in each race. Use information 
readily available in the Racing Form or harness track 
program. Factors include speed, distance, track condi¬ 
tion, post position, past performance, jockey or driv¬ 
er's record and other attributes. Use it at home the 
night before or tote it with you to the track and hand¬ 
icap between races! Handicap an entire race in a few 
minutes and a whole card in less than an hour! List 
rankings to screen or printer. 24K version even builds a 
RAM file for the entire card! Includes harness and thor¬ 
oughbred programs, complete documentation and 
betting guide. State memory requirement when 
ordering. Only $49.95. 


Federal Hill Software 
825 William St. 
Baltimore, Md. 21230 
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266 IR=4:IC=32:A="":GOSUB 8:G0SUB 6 

267 IF D2=0 AND IN*="" THEN 260 ELSE IF 
INK >"" THEN D2=X 

268 IF DEI (6) ="" THEN 265 ELSE IR=4:IC=3 
2:X=D2:60SUB 10:RETURN 

270 IF DEI(7) = "" THEN RETURN 

271 IR=5:IC=32:A="":G0SUB 8:G0SUB 6 

272 IF D3=0 AND INI=" N THEN 260 ELSE IF 
INI< >"" THEN D3=X 

273 IF D EI (7)="" THEN 270 ELSE IR=5:IC=3 
2:X = D3s GOSUB 10:RETURN 

275 IF D E * (8) ="" THEN RETURN 

276 IR=6:IC=32:A="":G0SUB BiGOSUB 6 

277 IF D4=0 AND INI="" THEN 260 ELSE IF 
I Nl< >"" THEN D4 = X 

278 IF DEI(8) ="" THEN 275 ELSE IR = 6:IC=3 
2:X=D4:GOSUB 10:RETURN 

280 IR=7sIC=10:A="Entry Correct (Y/N): " 
:GOSUB 8:A=INPUTI(1):IF A="N" OR A="n" T 
HEN 200 ELSE IF AIO"Y" AND AO"y" THEN 
280 ELSE PRINT A; 

285 IX=IX+1 

290 CK*(IX)=CK*:DT*(IX)=DT*:GR(IX)=GR:FT 

(IX)=FT:ST(IX)=ST:SS(IX)=SS:D1(IX)=D1:D2 

(IX)=D2:D3(IX)=D3:D4(IX)=D4 

295 GOTO 200 

300 'edit 

305 A1 = R +" "+M0*(FX)+" " + U:GOSUB 800 


FulIVu 100 

for the TRS-80 Model 100 Portable 


Have 50 or more previous screen displays available on-line when 
communicating with information utilities (Dow Jones, CompuServe, 
MCI Mail, Official Airline Guide, etc.). 

FulIVu 100 uses the available memory of the Model 100 to save screen 
displays during on-line connections. The more available memory, the 
more on-line displays. Redisplay of previous screens is controlled by 
simple cursor key action a screen at a time — all while maintaining the 
host connection. 

Features of FulIVu 100 

Machine code program for efficiency and speed 
Supports ADRS.DO file for auto dial and auto logon 
Supports direct or acoustic modem connection 
Supports printer port for hard copy 
Supports full/half duplex 

Dynamic, cyclic buffer ensures continuous data capture 
— you can’t run out of buffer space. Size of capture 
buffer not preallocated — expands to use all avail¬ 
able meimory on each connection. 

Operates on 24K or 32K Model 100 
Supplied on cassette with manual 

$39.95 

THOMAS Software 
2632 Sumac Ridge 
White Bear, MN 55110 


310 GOSUB 700 

315 FOR 1 = 1 TO 10:IR=I + 1:IF IR>6 THEN IR 
= IR—5 

320 IC=0:IF I>5 THEN IC=20 
325 A=R+STR$(1-1)+" "+U:G0SUB 8:NEXT I 
330 IR=7:IC=2:A="Enter Date of Check* or 
' "+EE*+"’ to exit":GOSUB 8 
335 IR=2:IC=12:A="":G0SUB 8 
340 GOSUB 6:IF IN*="*" THEN GOSUB 1100:G 
0T0 100 ELSE IR=7:IC=0:A=BL*:GQSUB 8 
345 FOR 1 = 1 TO IX:IF IN*=DT*(I) THEN 355 
ELSE NEXT I 

350 IR=7:IC=3:A="Check not found, press 
any key ... ":G0SUB 8:A=INPUT*(1):GOTO 3 
00 

355 DT*=DT*(I):CK*=CK$(I):GR=GR(I):FT=FT 
(I):ST=ST(I):SS=SS(I):D1=D1(I):D2=D2(I): 
D3=D3(I):D4 = D4(I) 

360 GOSUB 233:GOSUB 238:G0SUB 243:G0SUB 
248:GOSUB 253:G0SUB 258:G0SUB 263:G0SUB 
268:GOSUB 273:G0SUB 278 
362 IR=0:IC=0:A = "Record #"+MID*(STR* (I) , 
2):GOSUB 8:XN=GR-FT-ST-SS-D1-D2-D3-D4: IR 
=0:IC=28:A="Net:":G0SUB 8:X=XN:IC=32iG0S 
UB 10 

365 IR=7:IC=1:A="Enter field to edit, or 
' "+EE*+"' to exit: ":G0SUB 8 
370 I N*=INPUT*(1):IF IN*="*" THEN 385 EL 
SE IF IN*<"0" OR IN*>"9" THEN 365 ELSE N 
=VAL(IN*) 

375 ON N+l GOSUB 230,240,245,250,255,235 

,260,265,270,275 

380 GOTO 362 

385 DT*m=DT*:Ck*(I)=CK*:GR(I)=GR:FT(I) 

=FT:ST(I)=ST:SS(I)=SS:D1(I)=D1:D2(I)=D2: 

D3(I)=D3:D4(I)=D4 

390 IF MD=100 THEN GOSUB 6 

395 GOTO 300 

400 'display totals 

405 IF IX=0 THEN 100 ELSE A1=R+" "+M0*(F 
X)+" "+U:GOSUB 800 

410 GOSUB 700:IR=2:IC=1:A=BL*:GOSUB 8:IR 
=7:IC=15:A="Computing ... ":G0SUB 8 
415 FOR 1=1 TO 8:T(I)=0:NEXT I 
420 FOR 1=1 TO IX 

425 T(1)=T(1)+GR(I):T(2)=T<2)+FT(I):T(3) 
=T(3)+ST(I):T(4)=T(4)+SS(I) 

430 IF DE*(5)<>"" THEN T(5)=T(5)+D1( 1) 
435 IF DE* (6)0"" THEN T (6) =T (6) +D2 (1) 
440 IF DE*(7)< >"" THEN T(7)=T(7)+D3 (I) 
445 IF DE* (8)0"" THEN T (8) =T (8) +D4 (I) 
450 NEXT I 

455 FOR 1=1 TO 8:IR=I+2:IC=12:IF I>4 THE 
N IR = IR—4:IC=32 

460 IF I>4 AND DE*(I) ="" THEN 470 
465 X=T(I):GOSUB 10 
470 NEXT I 

475 GOSUB 770:GOTO 100 
500 'print totals 
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505 IR=7:IC=0:A=BL$:6OSUB 8:IR = 7:IC=14:A 
="Printing ... ".-GOSUB 8 
510 LPRINT" Date ";:FOR 1 = 1 TO 9:T(I> 
=0:NEXT I 

515 FOR 1 = 1 TO 9:A = DE$ (I) 

520 IF LEFT!(A, 1) =" " THEN A=MID* (A, 2):G 
OTO 520 

525 J=LEN(A):IF J<8 THEN AA=STRING*((8-J 
)/2," "):A=AA + A+AA:IF LEN <A)<8 THEN A=A + 

II II 

530 IF 1=4 OR 1=9 THEN A=MID$(A,2) 

535 LPRINT A;:NEXT Is LPRINT 

540 FOR 1 = 1 TO IX:LPRINT DTI(I);TAB (9);U 

SINS "####.## ; G R (I); FT (I) jST(I) : LPR IN 

T USING"###.## ";SS(I);:LPRINT USING"### 

#.## ";D1(I) ;D2(I);D3(I>;D4(I);:XN=6R<I) 

-FT(I)-ST(I)-SS(I)-D1(I)-D2(I)-D3(I)-D4( 

I):LPRINT USING"####.##";XN 

545 T(1)=T(1)+GR(I):T(2)=T(2)+FT(I)iT(3) 

=T(3)+ST(I):T<4)=T(4)+SS(I)iT(5)=T(5)+Dl 

(I):T(6)=T(6)+D2(I):T(7)=T(7)+D3(I):T(S) 

= T(8)+D4(I)s T(9)=T <9)+XN 

550 NEXT I 

555 LPRINT: LPRINT"Totals"TAB(8)jUSING" # 
###.##";T(1);T(2>;T(3);:LPRINT USING"### 
#.## ";T(4);:LPRINT USING"####.## ";T(5) 
;T <6);T <7);T(8);T(9) 

560 GOTO 100 
600 'end program 

610 IF MD = 16 THEN CLS:END ELSE MENU 
700 'display screen 

705 IR=2:IC=07:A="Dates ":GOSUB 

8 

710 IR=2:IC=24:A="Check #: ":GOSUB 

8 

715 FOR 1 = 1 TO 8:IR = I+2sIF IR>6 THEN IR = 
IR — 4 

720 IC=4:IF I>4 THEN IC=24 
730 A = DEI(I)+": ":GOSUB 8 

740 NEXT I 

750 IR=1:IC=5:A="Last Record Entered: "+ 
DTI(IX)+" (#"+MIDl(STRI (IX) ,2>+">"sGOSUB 
8 

755 RETURN 
760 'FI 

765 IR = 7! IC=7:A="Enter " + R + " "+EEI + " " + U 
+" for DATE to exit":GOSUB 8:RETURN 
770 'continue 

775 IR=7:IC=5:A="Press any key to contin 
ue ... "sGOSUB 8:A=INPUTI(1):RETURN 
800 'clear screen @ print title 
810 GOSUB 4 

820 IR=0: IC=20-LEN(Al)/2 
830 A=A1:GOSUB 8 
840 RETURN 
900 'open for input 

910 IF MD=16 THEN OPEN"I", 1 , "PAY/DAT" EL 
SE OPEN "PAY.DO" FOR INPUT AS 1 
920 RETURN 


930 'open for output 

940 IF MD=16 THEN 0PEN"0",1,"PAY/DAT" EL 
SE OPEN "PAY.DO" FOR OUTPUT AS 1 
950 RETURN 

1000 'read in all data 
1010 GOSUB 900:IX=0 

1020 IF EOF(1) THEN CLOSE:RETURN ELSE IN 
PUT #1,CKf 

1030 IF CK$="*" OR EOF(1) THEN CLOSE:RET 


URN 

1040 INPUT #1,DT$,GR,FT,ST,SS,D1,D2,D3,D 
4 

1050 IX=IX+1 

1060 CKI(IX)=CKI:DTI(IX)=DTI:GR(IX)=GR:F 


T(IX)=FT:ST(IX)=ST:SS(IX)=SS:D1(IX)=D1:D 

2(IX)=D2:D3(IX)=D3:D4(IX)=D4 

1070 GOTO 1020 

data 

!A=BLI:GOSUB B: IR=7:IC=12: 
... ":GOSUB 8:GOSUB 930 
IX 


1100 'save all 
1110 IR=7:IC=1 
A="Saving Data . 
1120 FOR 1=1 TO 


! CHRI (34) ; 

’;SS (I ); 1 


';GR(I); 
' ;Dl (I) ; 


1130 PRINT #1,CHR!(34);CK$(I);CHRI(34)", 
";CHRI(34);DTI(I)j 
; FT(I);",";ST(I) ; 

; D2(I);",";D3(I);",";D4(I) 

1140 NEXT I:PR I NT # 1,CHRI(34);"*" 5 CHRI(3 
4) : CLOSE 
1150 RETURN 
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The Preble NavComp 

Two Aviation Programs in one package! 


NavPIn 

for Flight Planning 


• Creates a complete Navi¬ 
gation Log. 

• Saves the entire Route of Flight 
for future flights. Just enter new 
weather and performance data. 

• Provides all the standard Navi¬ 
gation Data. 

• Compensates for Climbs and 
Descents. 

• Can accept nautical or statute 
measurements. 

• Has many error prevention 
features. 

• Computes the effects of Den¬ 
sity Altitude. Wind Drift and 
Magnetic Variation on True Air¬ 
speed. Ground Speed. Head¬ 
ings. ETA s and ETE's. 


NavAid 

for Realtime Navigation 


• Tracks your flight in Real Time. 

• Lets you modify Flight Data as 
necessary. 

• Hasincrediblegraphicdisplays 
of Position, Fuel Burn and 
More! 

• Can update position using VOR 
intersections. 

• Has Cursor selectable menu of 
functions. 

• Can be turned off and on in 
mid-flight without loss of data. 

• Has Interupt Function Keys for 
check point passage, VOR Inter¬ 
section Display, Incremental 
Position Update. Ground Speed 
Update and Position Update by 
VOR Reference! 


—The Preble NavComp: Self-prompting and user friendly! 

—The Preble NavComp: Created by a Certificated Flight Instructor for 
pilots who demand excellence! 

—The Preble NavComp And the TRS80 Model 100: An unprecedented 
partnership made FOR the HEAVENS. 


The Preble NavComp is only $49.95 — 
Shipping and Handling $1.50 to U.S. and \ 
Canada — $5.00 to other foreign points -sr~ 

Visa and MasterCard accepted. 

A TRS80 Model 100 with at least 16K is 
required. 

Order From: Dr. Preble’s Programs; 6540 Outer 
Loop; Louisville, KY 40228 (502) 966-8281 
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Reviews 


Software 


Open Your 2000 
To The Excitement Of 


Integrated software comes to the 
Tandy 2000 with a vengeance through 
Open Access , one of the most complete 
software packages we have seen for this, 
or any other, sophisticated computer 
system. Indeed, Open Access is one of 
the best single buys you can make in 
making your 2000 into a full-blown bus¬ 
iness and management system. 

The full package from Software Pro¬ 
ducts International — SP1 — includes 
modules for database management, a 
spreadsheet, word processing, graphics 
(including 3-D graphs), communications 
and time management. Each of these 
programs is a complete system in itself, 
but the primary feature of Open Access 
is that each is part of an integrated sys¬ 
tem which allows one part to transfer 
data and information to another. 

As an example, suppose you create a 
database containing the names, 
addresses, start dates, social security 
numbers, salaries and departments of 
all employees in your company. Once 
the database is created, the information 
can be transported to a spreadsheet and 
further moved into graphics, all without 
ever entering the data again. 

Need to incorporate the same infor¬ 
mation into a letter? That can be done 
with the word processing module. Want 
it transferred to a remote computer? 
The communications module can do the 
job. 

At first blush. Open Access seems to 
be quite formidable. It contains two 
thick manuals — a tutorial and a refer¬ 
ence guide — plus a "getting started” 
booklet and several other things. The 
original thought might well be "How 
will I ever learn all of this?”, but, in 
truth, it is important to consider that 
what you are dealing with is six full¬ 
blown programs. 

Consider that and the documentation 
isn’t quite as frightening. In fact, it is a 
lot easier to learn the six Open Access 
programs than it would be to learn six 


Open Access 

By Lawrence Falk 

separate programs. That is because most 
of the conventions which apply to one 
program apply to all of them — and 
many keys are common to all. In truth, 
this really "whittles down” Open Access 
quite quickly. 

As something of an expert in looking 
at documentation (I review a lot of 
software and hardware), 1 would rate 
that of Open Access in the Top 10 as far 
as ease of understanding is concerned. 
There are a few gaps along the way, but 
once I understood the database man¬ 
ager, 1 found the spreadsheet much eas¬ 
ier to comprehend. As a teacher might 
say, 1 had already learned something. 

I won’t try to go into total detail on 
any of the modules, because they all 
work quite well. The database manager 
is easy to learn and quite flexible. It 
makes reports extremely easy to pro¬ 
duce. You can set up data entry screens 
as you wish, use a default report or cus¬ 
tomize your own, do mailing labels and 
the whole bit. It searches and sorts 
quickly and efficiently. Open Access 
database manager is a program well 
worth buying for itself. 

Like other modules, the database 
manager uses windows to allow use of 
information from more than one data¬ 
base at a time. This can be very impor¬ 
tant in such applications as accounting, 
receivables and the like. This is an 
important option that makes Open 
Access perfect for a wide range of appli¬ 
cations. 

The spreadsheet is also easy to use. In 
fact, one of the easiest and fastest I have 
seen. Those who think that all spread¬ 
sheets are alike should take a look at 
Open Access , which lets you concen¬ 
trate on the problem rather than how 
you enter the problem. 

Having worked with a great number 
of spreadsheets from VisiCalc on up, I 
would rate Open Access one of the very 
best. This is just from the standpoint of 
number crunching, the very thing for 


which spreadsheets were designed. Open 
Access does an excellent job with the 
"what if’s” that are the raison d'etre of 
all spreadsheets. 

But there is more. Suppose what you 
really need to know is what you have to 
do to net $1 million during your next 
fiscal year. With other spreadsheets, the 
only way to do this is to keep playing 
with the numbers — changing this and 
that — until your forecast comes out as 
you want it. Open Access , however, 
provides a handy "goal seeking” method: 
You enter in what you want to achieve, 
and the program tells you what the 
"what if’s” have to be. 

Maybe we should not quibble. After 
all, anyone who ever sat down with a 
piece of accounting paper and a calcula¬ 
tor to try to work out a complicated 
projection will rightly believe that a 
spreadsheet where you only have to 
change the variables and have the calcu¬ 
lations done for you is the greatest thing 
since sliced bread. But, now, you don't 
even have to work out the variables — 
just tell Open Access what you want to 
accomplish and it will do the goal seek¬ 
ing for you. A truly marvelous feature! 

I cannot say enough about the gra¬ 
phics. You have a choice of so many 
different kinds of graphs— bar, pie, line 
and 3-D — that you have to feel your 
cup runneth over. Additionally, you can 
change colors and textures of graphs all 
at once or — even — produce a "slide 
show” of one graph after another. 

Can you print them out? Yes, you can 
and with a variety of printers that are 
common to most computer systems. 

But the piece de resistance is the 3-D 
graphics. These are beautiful and allow 
all sorts of data to be clearly shown. In 
addition, the graphics are drawn quickly 
and, here’s that word again, "easily.” 1 
constructed a 3-D graph to show sub¬ 
scription projections for PCM in 15 
minutes, including the time it took me 
to enter the data. Yes, you can enter the 
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data directly into the graphics module, 
for a “quick and dirty” visual represen¬ 
tation of information. 

The word processing module does 
everything a word processor should be 
able to do. And, again, this is accomp¬ 
lished with ease. By the time 1 got to the 
WP module, 1 was already familiar with 
many of the command keys common to 
all the programs, which made learning it 
very simple. And, the integration of 
word processing with the database 
manager means that you can produce 
form letters which are personalized with 
all sorts of variables. You can also 
import data from a spreadsheet and 
produce it in a letter or a report. 

1 also found the communications 
module easy to use. It has several advan¬ 
tages, such as storing commonly use tel¬ 
ephone numbers, but it does the two 
things a communications program is 
supposed to do: Transfers data from 
one computer to another and allows 
you to access bulletin boards as well as 
subscription services like CompuServe, 
The Source and Dow Jones. 

The time management option is the 
finest 1 have seen. It allows you to look 
at a whole month at a glance, set up days 
in 30 minute increments and even lets 
you write notes to yourself. And, if you 
have a tennis date every Monday at 6 
p.m. for the next six months, you can 
place all of them into your schedule with 
one entry! 

Open Access provides outstanding 
screen formats which are easy to use and 
read especially when combined with a 
color monitor. More than any other 
program 1 have seen thus far, it takes 
full advantage of the colors, speed and 
resolution available in the Tandy 2000. 

Several of the features are in the “gee, 

1 wish” category. A “calculator” is 
available in all the modules — which 
allows you to do simple addition, sub¬ 
traction, multiplication and division 
on-screen. How many times have you 
been writing a letter when you had to 
stop to fetch a calculator just to figure 
what 18 percent of 9,457 was? You can 
do it on-screen with Open Access — and 
then zip it into the place you want in 
your letter. 

The “Help” screens are truly helpful. 
You simply press FI at any time you 
want some explanation. Most impor¬ 
tant, the information you get is really 
helpful. It is obvious that considerable 
time went into the preparation of this 
part of the program. 

I am also impressed with the part of 
the documentation which explains how 


to set up your 2000 for Open Access. 
Considering how complicated the pro¬ 
gram is, this was one of the easiest 
installations I have been through. And, 
the one place where problems always 
seem to crop up — customizing to your 
equipment and tastes — came off with 
nary a hitch. 

If it seems 1 am enthusiastic about 
Open Access , I am. Open Access is an 
outstanding example of integrated 
software which will make you — and 
your Tandy 2000 — into the kind of 
productive team you envisioned when 
you bought your computer in the first 
place. If you want to see the true com¬ 
puting power available in the 2000 — 
then watch it run Open Accessl 

(Radio Shack, cat. no. 90-0114, $595) 


Software 

Traveling 

Appointment 

Manager: 

Professional Program 
With Bonus 

By D.E. Mitchell 

When you purchase The Traveling 
Appointment Manager from Traveling 
Software, Inc., you get an unexpected 
bonus. The tape actually contains two 
related but distinct programs — The 
Traveling Appointment Manager and 
The Traveling Things-To-Do Manager. 
Each of the programs helps you organ¬ 
ize your time, but in different ways. 

If you are like me, the first thing you 
will do when you receive this impres¬ 
sive-looking package is to load the pro¬ 
grams. At the start of the manual, it tells 
you that the tape contains three pro¬ 
grams; the core Appointment Manager 
program (APPMGR), the Appointment 
Manager file backup and report printer 
module (AM-B/ P), and the Things-To- 
Do Manager program (TTDMGR). 
(Actually, it has three copies of each, in 
that order.) Unless you have a 32K, 
empty machine without disk video BASIC 
in it, you will find yourself in the same 
dilemma I did — they won’t all fit. 
APPMGR uses 10,198 bytes, AM-B/ P 
4,517 bytes, and TTDMGR 10,009 


bytes, so you would need approximately 
25K of free memory just to load them. 

Only after reading the documenta¬ 
tion through, did 1 realize that you 
aren’t supposed to load them all at once. 
Only APPMGR is required for the 
Appointment Manager program to 
function, and AM-B/ P doesn’t have to 
be loaded until you are ready to check 
your data file and/or print a report. 
Even then, it can be swapped with 
A PPMGR at that time and work alone. 
The Things-To-Do Manager is not quite 
so big, and the author has combined the 
file management and print routine as 
part of the main program. So the most 
space you absolutely need at any one 
time is slightly over 10K for the pro¬ 
gram and some space in addition for 
data files (more on them later). 

Since there are two distinct programs, 

I will discuss the features of each separ¬ 
ately at this point. 

The Traveling Appointment Manager 

When you run A PPMGR. BA to start 
the program you get the Traveling 
Software logo for a brief moment and 
then a calendar is drawn for the current 
month. It is driven by the Model 100’s 
internal clock, so the current month is 
displayed (assuming your clock is prop¬ 
erly set). If you have already entered 
appointments for the month, days that 
have appointments will be highlighted. 
If you have already entered appoint¬ 
ments for the current day, a message 
will alert you to that fact when you start 
the program. The date is displayed in 
Year: Month: Day format. Changing 
the year or the month will change the 
calendar display. Changing the day or 
just hitting ENTER will give you that 
day’s appointments in summary form, 
or the opportunity to enter new ones if 
none have been previously entered. You 
can then choose to add, change, delete, 
reschedule or view appointments in de¬ 
tail. Since you enter a start time and 
estimated duration for each appoint¬ 
ment, the program is able to detect over¬ 
laps and warn you of them. 

In the interests of memory conserva¬ 
tion, you have the option of setting a 
retention period for your data files. This 
is a handy feature, since the Model 100’s 
memory definitely needs conservation, 
and different people will have differing 
retention requirements. 

The AM-B/P program is also used 
for memory conservation. From its 
menu you may choose the file manage¬ 
ment system, which tells you how many 
appointments you have stored and how 
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big the file is (each appointment seems 
to take roughly 60 bytes of storage). 

You may then choose to backup the file 
if you want. This is a rather unusual 
procedure. The file, called A MDA T. DO, 
is invisible to your Model lOG's menu. 
The backup feature makes it visible and 
assigns it a name based on the date you 
created it, e t g f , AMO430.DO if created 
on 30 April. This file may then be saved, 
killed, and even edited using normal 
Model 100 techniques. This file, or one 
previously saved and recalled, can then 
be restored to the current, invisible file if 
desired. 

The other side of the AM-Bj P pro¬ 
gram allows you to print a very nicely 
formatted appointment schedule span- 
ninga designated date period. This is an 
excellent feature to provide you with a 
hard-copy of the upcoming weeks sche¬ 
dule for reference, to be updated as you 
go along. 

The Traveling Things-To-Do Manager 

The operation of this program is sim¬ 
ilar to the Appointment Manager. 
However, since the file management, 
printerand coreprogram are combined, 
you must select what you want to do 
when you first run the program. If you 
elect to run the core program, you are 
then met with the monthly calendar. 
From here, you proceed to the approp¬ 
riate date. In this program, however, 
instead of extensive detail on each ap¬ 
pointment, you rank-order a to-do list 
by date (eit her numerically or alphabet¬ 
ically). An ordered listing may then be 
reviewed on the screen or printed as a 
hard-copy, “Things to-do” list. 

As previously described for the Ap¬ 
pointment Manager, you have the option 
of setting the record retention period, 
checking the size of the current file, 
making the file visible for storage, edit¬ 


ing, etc. (converts invisible TDD AD 
A. DO Vo TD+date, e.g., TDO430.DO),. 
or of restoring a file to “current” status. 

General Comments 

The documentation is provided in 
two forms, the written version and an 
oral presentation by the “Traveling Pro¬ 
fessor 11 on the reverse side of the tape. 
The written version is extremely profes¬ 
sional and thorough. Other than jump¬ 
ing the gun in loading (my fault), 1 was 
able to effectively use the program in a 
short period of time. The oral presenta¬ 
tion was a bit too “cutesy 11 for my taste, 
and 1 really didn't feel that it contrib¬ 
uted to the overall value of the program. 

Since the programs were written be¬ 
fore Radio Shack announced the disk/ 
video interface, you can't really fault 
Traveling Software for the fact that it 
doesn't anticipate that upper memory 
will be different on the Model 100 w r hen 
disk BASIC is resident. Disk BASIC re¬ 
sides in locations 58263 through 62960, 
so the CLEAR 256,62890 statement in 
Line 1 of both APPMGR.BA and 
TTDMGR. BA is illegal and results in a 
program abort with an “FC 1 ' error. 
Since the only way l know of to remove 
disk basic once it is booted is a com¬ 
plete power down, 1 needed to get 
around this somehow. Changing the 
statement to a simple CLEAR 256 (no 
location) in both programs seemed to 
do the trick, but 1 hesitate to recom¬ 
mend it since I'm not sure that some¬ 
where down the line it might not unex¬ 
pectedly bite you. Short of analyzing 
the entire program though, that was the 
only way 1 found to get it to work. 
Maybe the author can suggest a more 
scientific approach to get it to work with 
disk basic. 

While on the subject of disk/video 
interface, the somewhat unusual method 
of file backup fits in quite nicely with it. 


Since you have the datafile under con¬ 
trol of the Model 100 editor rather than 
having it stored and retrieved directly 
from a tape, you can easily store and 
retrieve it from a disk as well. I keep all 
three programs and my datafiles on a 
disk, and just load and carry around 
with me w ? hat l need at any given time. 

One little quirk I noted but didn't 
know what to do about, was the reten¬ 
tion of two small invisible files after the 
file backup procedure had been run, 
including a 115 byte AMDATA.DO 
and an 87 byte TDDATA.DO file. 1 
could find them with a directory moni¬ 
tor utility, but they were invisible to the 
Master Menu and consequently to the 
“KILL” command. Not really a big 
thing, but curious. 

Overall, 1 was very pleased with the 
total package. It did everything the 
authors said it would, and included the 
little additional “bells and whistles” that 
distinguish a truly professional program 
from one which is merely good. For 
example, when you have an appoint¬ 
ment for the day, the program greets 
you on powemp with a Good Morning, 
Afternoon or Evening based on the clock's 
time of day. Not strictly necessary, but 
nice. 

If you have a lot of meetings and 
appointments to schedule and keep track 
of during the day, then I fed that this 
software will definitely help you in keep¬ 
ing them straight. I have gone from not 
even knowing that 1 needed it to really 
missing having it when it isn't loaded. 
As with anything else, whether it is 
worth the asking price depends on your 
needs for its features. The quality of the 
programming is certainly consistent 
with its $59.95 price tag. 

(TravelingSoftware, Inc,, 11050 Fifth 

Avenue N,E,, Seattle, WA 98125, 1- 

800-343-8080, $59.95) 


Radio/hack Model 100 & SEC PC-8201 

MEMORY MODULES 

• Suggested List $120.00, Purple price $59.95 

• Low powerCMOS design. ^jp nc,udes pos,aae & hantm "3 

• Simple installation-instructions included. 

• 30 day satisfaction guarantee or your money back. 

• 1 Year warranty. 



Shipping ; From stock. Free UPS surface Coni. USA -Add $4.00 lor UPS l day 
Air-Add 57.00 lor Canada-Piymenl: VISA m MfC, Checks held id days, COD add 
$5, Oft -Tat: 6% (QaliL only) 


RJflPlE COMPUTING CALL NOW 
2068 Ventura Hlvd, #LA » • 
Camarillo, Ca. 53010 U (805) 937-4788 
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The Ideabook — 
Problem Solving 
With BASIC 


You bought your Model 100 for por¬ 
tability, ease of use, and the built-in 
software you needed. You’re not a pro¬ 
grammer and never intended to be one. 
This computer spares you the pains and 
trivia of operating system commands 
and programming errors. But now 
you’ve mastered the applications soft¬ 
ware and feel confident enough to ex¬ 
plore BASIC. You should consider David 
Ahl’s The TRS-80 Model 100 and NEC 
PC-8201 Ideabook as your guide. 

First, a word about what this book is 
not. It is not an exploration of Model 
100 software other than BASIC. It never 
delves into the hardware wonders that 
made this machine InfoWorld maga¬ 
zine’s “Hardware of the Year.” It doesn’t 
attempt to offer any insights into the 
unique abilities of your portable BASIC. 
Pretty basic, you say? Exactly! So what’s 
the big ideal 

The Ideabook introduces you to prob¬ 
lem-solving concepts using Model 100 
BASIC. Each problem is presented with a 
brief prose introduction, a program list¬ 
ing ready to type and run on your trusty 
computer, and sample output. But the 
real idea often comes last. The author 
challenges you to apply the techniques 
just demonstrated to solve a similar 
problem or explain and modify your 
results. You’re probably already flip¬ 
ping to the back of the book for answers. 
But wait; it isn’t going to be that easy. 
The idea’s the thing you supply. 

The 50 samples cover everything from 
a simulation of a lunar landing to a 
quadratic equation solver. The programs 
are divided into nine categories: 

1) Drill and Practice 

2) Problem Solving 

3) Sets and Repetitive Trials 

4) Convergence and Recursion 

5) Compounding 

6) Probability 

7) Geometry and the Calculus 

8) Science 


9) Potpourri 

All of the sample programs should 
run on an 8K Model 100 with memory 
to spare. 

Most of the programs are short, aver¬ 
aging 10 to 20 lines each. A simple 11- 
line interest program demonstrates that 
if only you could invest $100 at 10 per¬ 
cent interest, you’d have $259.37 at the 
end of 10 years. In 12 lines of BASIC, you 
learn that a dollar can be changed 292 
different ways. More importantly, you 
are asked to alter that solution for new 
circumstances. Suppose two of the coins 
are quarters. What if four of the coins 
are dimes? If you answer the questions, 
the programs become a real education, 
and an approach gradually emerges. 

Besides the programs and the ap¬ 
proaches, The Ideabook offers a wealth 
of interesting trivia already hinted at. 
Ever wonder about the term for “a 
word, verse, or number that reads the 
same backwords or forwards”? The sec¬ 
tion on palindromes provides the answer. 
It also provides a fascinating way to 
generate a palindrome from most num¬ 
bers. And it challenges you to discover 
what numbers will not become palin¬ 
dromes using this method. 

As the author of 16 books and founder 
of Creative Computing magazine, David 
Ahl brings considerable experience to 
The Ideabook. The explanations and 
descriptions are well written and very 
easy to follow. If you are new to Model 
100 BASIC, that fact, and the fact that 
these programs run as listed on your 
PoCo make this a better choice than a 
general treatment of the BASIC language. 

If you hope to unlock advanced func¬ 
tions like telecommunications and graph¬ 
ics, this volume does not hold the key. 
The only reason I can imagine for this 
omission is that the Model 100 version 
of The Ideabook is only one of a series 
of six. To take advantage of the BASIC 
similarities among such different ma¬ 
chines as the Commodore 64, the Epson 
HX-20, the TI-99/4A, and Microsoft 
BASIC (of which Model 100 BASIC is one 
dialect), the author has chosen the least 
common denominator as his focal point. 
The same examples, with minor revi¬ 
sions, work for six different BASICS. 
Still, I would very much appreciate a 
section that covers sound, graphics, and 
communications in the context of prac¬ 
tical problem solving. At the very least, 
these capabilities could be demonstrated 
beyond the two simple plot routines 
included. 

The Ideabook is a worthwhile course 


in computer problem-solving. Once 
you’ve worked your way through the 
book with computer in lap, you know a 
lot more of what your Model 100 can 
and cannot do. You learn to make your 
machine do more and do it better. That 
is, after all, the whole idea. 

(Creative Computing Press, 39 E. Hanover 
Avenue, Morris Plains, NJ 07950, Soft- 
bound, 139 pages, $8.95) 

— Dennis Kirley 


Software 

Radio Shack’s 
Scrip sit 100: 
Fast, Simple To Use 

Radio Shack has finally released its 
version of a text-processing program 
for the Model 100. Scripsit 100 takes 
text files created within the Model 100 
TEXT program and reformats them 
according to your specifications. 

The program is distributed on cassette. 
Although simple, the installation pro¬ 
cedure (creating a backup copy of the 
tape and installing the RAM copies of 
the program files) is quite time consum¬ 
ing. The manual requires almost four 
pages to describe the process. Once 
installed, however, the program and 
associated modules can easily be run 
from MENU. The entire set of pro¬ 
grams requires only about 4K of RAM 
storage. 

The WSPEC.DO file which accom¬ 
panies the program contains default 
formatting specifications which Scripsit 
100 uses when printing your text files. It 
provides initial settings for: lines per 
page (page length); line length; top, bot¬ 
tom, left and right margins; number of 
printed lines per page; header and footer 
information; line format (normal, justi¬ 
fied or centered); spacing between lines; 
whether an extra line should be printed 
following each paragraph; first and last 
pages to be printed; first page number; 
number of copies; continuous form or 
single sheets; whether a form-feed should 
be issued at the end; where output 
should be directed; and a printer setup 
string. WSPEC.DO can be modified 
through the TEXT program as your 
word-processing style and default re¬ 
quirements change. 

Let’s examine a few of the WSPEC 
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.DO options in more detail. First, the 
header line, in addition to containing 
user-specified text strings, has provi¬ 
sions for automatic inclusion of the 
date, time and/or page number. Both 
headers and footers can easily be toggled 
on or off from within WSPEC.DO — 
without erasing the header/footer in¬ 
formation. Second, you can print a 
subset of each document since both the 
starting and ending page numbers can 
be specified. Third, since you can indi¬ 
cate the first page number to be printed 
it is possible to join documents together 
— printing a second one where the first 
left off. Fourth, the "Output to:" item 
allows a formatted file to be printed to a 
printer, the screen, cassette, or to COM: 
(a serial printer or another computer). 
By printing to LCD:, for example, you 
can preview the document on screen 
and save paper. 

Of course, if the WSPEC. DO defaults 
were to remain constant throughout the 
printing of the document, Scripsit 100 
would be fairly limited. To allow some 
control over basic formatting, the pro¬ 
gram offers 11 types of "dot"commands 
which can be embedded within your 
text. These allow you to change the line 
formatting (right justified, centered, or 
normal — ragged right); toggle headers 
and footers off or on; reset the right and 
left margins; issue page breaks; suppress 
the printing of orphan lines at the bot¬ 
tom of a page; skin V lines; and change 
the spacing between lines (single-, dou¬ 
ble-, or triple-spaced). Each dot com¬ 
mand (e.g., “.C" for centered text) must 
be separated from other text by carriage 
returns. 

Printer control commands (for bold¬ 
faced print, underlining, etc.) are sup¬ 
ported through the Model 100 s "Ctrl- 
P” command. This, of course, requires 
you to know what control or escape 
sequences are needed for each printer 
command. Not particularly convenient, 
but at least the feature exists. 

Of the few Model 100 text-processing 
programs that I have examined so far, I 
prefer Scripsit 100. It is fast (no notice¬ 
able pauses while text is being format¬ 
ted), appears to be bug-free, and is sim¬ 
ple to use. In addition to its well-written 
manual, two pocket guides are included 
which offer assistance in copying the 
tape and using the dot commands. Until 
a full-featured word-processing program 
for the Model 100 becomes available— 
and I advise against holding your breath 
while waiting —Scripsit 100 is my choice. 

— Steven Schwartz 


Software 

MAI Accounts 
Receivable 
‘One of the Best’ 

By Mary Jeann Batham 

Nothing is closer to an accountant's 
heart than a good accounts receivable 
software program. MAI has managed 
to produce a very user-friendly instruc¬ 
tion manual as well as an easy-to-use 
accounts receivable system. 

This powerful program will handle 75 
customer accounts and 300 open in¬ 
voices on a single floppy diskette, or 175 
customers with 1,750 open invoices on a 
two-disk system. 

The software also ages accounts re¬ 
ceivable for up to 120 days, works on 
either a cash or an accrual basis, records 
dates the accounts were opened and 
date of last payment, and ensures a con¬ 
sistent debit/credit balance with 
automatic control during data entry. 

Since the program interfaces with 
MAI's General Ledger, it posts sales 
and cash receipts to the proper ledger 
accounts. The oldest invoice for a cus¬ 
tomer can be posted, or a specific in¬ 
voice paid can be identified. Both cred¬ 
its and debits for an invoice/customer 
are input, and one-time-only customers 
are accommodated. 

Either balance forward or detailed 
invoices receivable can be used, aged 
open invoice reports or customer in¬ 
voice detail are displayed, and after-the- 
fact invoice data can be entered. 

Printers supported by this software 
are the Radio Shack models DMP-200, 
DM P-400, DM P-420, DM P-500 or 
DM P-2100. I tested the program using 
the DMP-120 and old, faithful Line 
Printer VI, and both worked fine. The 
manual states that patches for other 
printers are being developed and that a 
new disk will be sent when the work is 
completed. 

At the present time, the printer paper 
must be manually reset to top-of-form. 
Software to eliminate the form feed 
problem will be sent later. 

1 was very impressed with these fea¬ 
tures of the program: 

Numbers can be input with decimals. 
(Many accounting programs don’t rec¬ 
ognize a decimal point, and if one is 


typed, serious errors occur.) 

Screen formatting is excellent. A 
broken line appears on the CRT, indi¬ 
cating the length of the field. If field 
length is exceeded, rather than truncat¬ 
ing the information, the program re¬ 
turns the cursor to the beginning of the 
line. 

At the end of data input, the prompt, 
‘is the data correct?" appears. This 
saves the effort of editing the informa¬ 
tion later since corrections can be made 
instantly while the data is on the screen. 

The program will allow you to use 
either preprinted (addressed) state¬ 
ments, or it will print company name 
and address, allowing the use of more 
economical standardized invoice forms. 

Late charges can be personalized for 
each customer, standardized for all cus¬ 
tomers, or ignored. The late charges 
option can be transported to the General 
Ledger, or added as a memo to custo¬ 
mer statements and not posted to the 
Ledger. 

The file sizing is good. Default file 
sizes can be accepted, or values can be 
input. The program advises if a second 
data disk is needed to accommodate the 
files. 

Sales tax amounts can be set up in 
midyear and the program automatically 
adds tax figures to the original entries. 

A customer cross-reference lists 
names by customer code on the same 
screen as an alphabetical listing. This 
helps weed out duplicate listings for a 
customer. 

Displays can be output to the screen 
for a fast perusal of customer files, or a 
hard copy of the information can be 
printed. 

Customer mailing labels are created 
from the program. Labels for all custo¬ 
mers can be printed, or those for a 
selected few, defined by starting and 
ending costomer code, division, or cus¬ 
tomer name. 

Whoever wrote the instruction man¬ 
ual actually knew how to use the pro¬ 
gram. Menus are easy to understand, 
and the main menu gives three choices: 
1) set up the system (called Accounts 
Receivable definition), 2) post invoices 
and update files (Accounts Receivable 
system), and 3) maintenance (utilities). 

The instruction manual follows the 
menus step-by-step and is divided into 
six chapters, three of which follow the 
main menu. The three others are: ‘intro¬ 
ducing the system," "starting up," and 
"Appendices," which contains account¬ 
ing terms, error codes and hard disk 
information. 
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Flowcharts help you understand how 
the system works and Appendix A is an 
excellent tutorial which explains basic 
accounting concepts. The table of con¬ 
tents and accounting glossary are very 
helpful. 

Ten of the function keys are prepro¬ 
grammed for next, prior, first, last, 
date, list, delete, end, yes and no. A pack 
of labels is included with the program to 
illusrate the function keys. Use of these 
keys really speeds up the execution of of 
the program. 

Several error-traps are built into the 
software. For example, if you try to 
delete a customer who owes for an in¬ 
voice, the program prompts: “You may 
not delete active customers. CR to con¬ 
tinue. ” 

No software is perfect for everyone, 
and 1 encountered a few bugs. I tried to 
backup the operating disk using COPY 
A:*.* B:, but the tree directory didn’t 
copy. Using DISKCOPY A: B:, as 
explained in Chapter 9, works fine. 

When 1 tried to install a customer file, 
and attempted to save to disk, I kept 
getting “ERROR 16 line 4150 program 
AI1MAL Consult documentation.” In 
the addendum, I was advised that error 
16 was an error in CONFIG.SYS and 
was told to type END,<CR>and press 
Reset. That didn’t solve the problem, 
and I kept looping back to the same 
situation. 

Finally I went back to DOS, and 
typed: 

COPY CON CONFIG.SYS 

FILES = 10 

A Z 

This solved the problem, I was able to 
enter new customer files, and never 
encountered error code 16 again. 

When correcting data, I tried to use 
the cursor keys, but kept getting graphic 
symbols, rather than moving the cursor 
right or left. The addendum advises 
“remove the reference to the Cursor 
keys in the Keyboard section.” Ah, one 
of the reasons I like the Tandy 2000 
better than my 1BM-PC clone, is be¬ 
cause the cursor keys are separate from 
the numeric keypad. Maybe when they 
improve the printer, and provide top- 
of-form software patches, they will re¬ 
store control to my cursor keys! 

On several sub-menus, 1 tried to use 
the END key, rather than typing“END” 
or using function key F8. The program 
ignored my END key (even with the 
num-lock off), so I got used to using the 
function key. 

1 was extremely impressed with the 


report forms generated by this program. 
The sales journal, invoice printing, open 
invoice data, cash receipts journal and 
sales tax reports were excellent. 

I’ve used a lot of accounting pro¬ 
grams, but the MAI Accounts Receiva¬ 
ble software is one of the best. 

(MAI Accounts Receivable, Tandy Corpo¬ 
ration, 300 One Tandy Center, Ft. Worth, 
TX 76102, $495) 

Hardware 

The Axonix 
ThinPrint 80: New 
Portable Printer 
For PoCo 

By Jim Hawk 
PCM Contributing Editor 

T hird-party support for the Model 
100 is taking off —three different 
portable printers have recently 
been announced for the 100. First out of 
the gate is the Axonix Corp. of Salt 
Lake City, with the ThinPrint 80 — a 
lightweight dot-matrix thermal printer. 
A second model from the same firm will 
soon offer letter-quality print using a 
Japanese mechanism, and the third will 
feature virtually the same unit, but be 
powered by AC only. We were privi¬ 
leged to get one of the first ThinPrint 
units to torture test, and the results 
point to the day when a portable printer 
will become a part of many Model 100 
“field gear” kits. 

Axonix is not coy about admitting it’s 
using a mechanism made in the U.S. by 
the 3M company. In fact, the box the 
printer arrived in had nothing but a 
huge“3M”logo on it. Axonix engineers 
have taken the basic printer and added 
the necessary electronics to make it 
compatible with the Model 100, as well 
as batteries and a charging circuit to 
turn the normally AC-powered device 
into a portable. How does it work? Once 
1 got it set up (more on that in a 
moment) 1 was amazed by the speed and 
quietness of the printer, and easy legibil¬ 
ity of the finished product. 

Using 8-inch wide thermal paper, the 
ThinPrint 80 turns out text that rivals 
many office bound DMPs. One time 
saving feature: the printer buffer is quite 
large and returns cursor control back to 
you in a very short time, letting you get 
on to other things while the printer fin¬ 


ishes its job. The ThinPrint is also a 
tough little unit: the case is rugged 
enough to take the inevitable abuse of 
traveling, and the built-in NiCad batter¬ 
ies easily last a full day’s work. The 
drawbacks are common to all thermal 
printers: somewhat fuzzy letters that are 
slightly darker on one side of the page 
than the other and paper that needs un¬ 
curling. Working with wire service print¬ 
ers that use roll paper. I’ve perfected the 
technique for holding the paper at both 
ends and keeping it taut while bending it 
against the curve on the edge of a desk 
— inconvenient at best. The fuzzy let¬ 
ters actually end up making the print 
look less like dot-matrix, since each dot 
tends to blur into the other and gets 
more readable once you’re accustomed 
to it. The real price/performance break¬ 
through becomes obvious when you 
unhook the charger (a transformer-in- 
the-plug unit like the 100’s) and take the 
printer out on the road. The Axonix is 
built around a metal chassis yet weighs 
only four pounds, so it’s easy to carry 
around in a briefcase . . . with room to 
spare for the 100. Having the option to 
print out some work while away from 
the home-base printer came in handy 
—1 finally got to type up newscasts for 
the radio station I work for, waiting till 
the last minute to “print out.” And the 
unit's quiet, but impressive, performance 
leaves many onlookers amazed — espe¬ 
cially when they ask why there’s no line 
cord coming out of the unit. 

The Model 100 and ThinPrint 80 are 
exactly the same width and nearly the 
same depth but the rear of the printer is 
about three-fourths of an inch higher in 
back, with a slanting front hood. Colors 
are the same light tan and black, with 
the tan printer cover extending to about 
two-thirds of the way back until it’s met 
by the black plastic electronics/paper 
housing at the rear. The black part can 
be unlatched by releasing a pair of 
suitcase-like snaps on either side. It then 
folds back on hinges to allow changing 
of the special thermal paper rolls (at 
$4.20 a pop). This is also the place where 
I had to play electronics technician to 
get the Axonix printer working in the 
first place. 

The 3M box in which the unit arrived 
contained the Axonix printer, a Cen¬ 
tronics-type connector cable and a well- 
printed instruction book. Unfortunately, 
there were a couple of points left out of 
the instructions that had me phoning 
the company in Salt Lake City. Most 
important to the eager computerist: no 
one-page “quickie hookup” type instruc- 
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tions. Page 6 does mention the eight 
different interconnection cables offered 
for a variety of computers, but doesn’t 
go on to tell how to physically connect 
any of them. In the case of the cable 
needed for the M odel 100, it’s not speci¬ 
fied which way to plug the Centronics- 
style plug that can conceivably go in 
four different combinations from print¬ 
er to computer. Most alarming of all to 
people who don’t like to open up a 
brand new piece of electronics (much 
less make internal circuit changes) is 
that in order to get the Axonix to 
advance the paper you must make a 
circuit adjustment called for in Appen¬ 
dix A. However, the actual circuit board 
turned out to be significantly different 
from the one pictured. To figure out the 
correct procedure, I looked over the 
instructions and invoice sheet for either 
an 800 number or regular phone number. 
Surprisingly, the phone numbers were 
not to be found in the otherwise well- 
printed and documented instructions — 
a 50 cent call to AT&T’s long distance 
operator yielded the information. All I 
had to do was unhook a certain jumper 
wire on the circuit board, but this 
should have been pre-set at the factory. 
Another thing that left me guessing: the 
Centronics connector that fits into the 
Model 100’s printer port on the back 
has no indication of up or down — and 
the instructions made no mention about 
which way was correct. The parallel 
cable was an extra $40, on top of the 
$279 price for the printer itself and just a 
simple “up” sticker would have done the 
job. Not to be too critical with connec¬ 
tors never intended for the consumer 
market, I found it difficult to remove 
the plugs on either end of the cable. 

For portable applications, a quick 
hookup is essential and it would be nice 
if some clever engineer figured out how 
to make such connections using a sim¬ 
ple two-conductor audio cable — or 
maybe it’s “impossible.” Besides the text 
mode, there’s also a graphics mode. But 
since the instructions were in computer¬ 
ese, and I’m no programmer, this fea¬ 
ture went untested . . . example: “if the 
teleprinter protocol is selected, and the 
data byte is the ASCII 'Escape’charac¬ 
ter, then the next byte is examined to 
determine if the two bytes form one of 
the valid teleprinter protocol escape 
sequences.” If you know what that 
means, then you’re a prime candidate to 
translate the 32-page instructions. All in 
all, $249 is half what 1 paid for my AC- 
only dot-matrix, and the fact that the 


Axonix unit is battery operated makes 
it seem like a bargain. 

One note: the company has already 
announced a more expensive portable 
printer utilizing a Japanese mechanism 
that creates letter-quality print through 
a unique five-wheel printer head. But 
it’ll still be under $400 and use regular 
paper instead of thermal paper. A 
tractor-feed addition might be offered 
in the future, but for now it’ll be page or 
continuous feed paper only. Axonix 
intends to keep selling their cheaper 
thermal printer as well, on the theory 
that not all people would want the 
slower speed (15 characters per second). 
And, another company called Dataport 
is already taking orders for a look-alike 
machine with a similar five-wheel print¬ 
er head setup ... it only operates off 
AC but the price is also about $ 100 less. 
More on these two letter-quality prin¬ 
ters when they start being shipped. 

(Axonix Corp., 417 Wakara Way, Salt Lake 
City, UT 84108,801-582-9271, $279 includes 
batteries, AC adapter and an 80-page roll of 
paper) 


New Products 


PERCON Offers New 
Bar Code Reader 

Peripheral Connections (PERCON) 
has introduced a newly enhanced bar 
code reader that will connect to any 
computer that supports RS-232 ASCII 
communications. The E-Z-READER 
bar code reader features the Hewlett 
Packard digital wand and can read the 
three most popular industrial codes: 



Code 3 of 9, Interleaved 2 of 5, and 
Codabar/ABC. 

The E-Z-READER is designed to 
read dot-matrix printed bar codes, as 
well as those printed conventionally. 
The pen design enables it to read through 
thin protective plastic and poorly printed 


bar codes. Also, it can detect the code 
over a range of angles and pen speeds as 
well as variable bar code densities. A 
“good read” audible signal is a standard 
feature. 

It is possible to use the E-Z-READER 
as a stand-alone terminal without a 
CRT. The host computer can be pro¬ 
grammed to provide operator feedback. 
Two LEDs and a low frequency tone are 
provided for this purpose. 

The E-Z-READER bar code reader 
is currently priced at $495. For more 
information, contact: Peripheral Con¬ 
nections, 2190 W. 1 1th St., Eugene, OR 
97402; phone (503) 344-1189. 

Electronic Mail 

A new electronic mail software prod¬ 
uct is being offered for the Model 2000 
by Omni Computer Systems. FLASH- 
COM comes with several modules 
including its own word/text processing 
module, forms/screen file management, 
mailing list manager, and communica¬ 
tion module. It also contains a tutorial 
and dozens of standard business letters 
and forms ready to be used. It interfaces 
with applications written with Lotus 1- 
2-3, cl BASE II, PFS.File, Volkswriter, 
Perfect Writer, Perfect Calc, Multi Mate, 
WorclPlus, and others, and it operates 
with more than a dozen modems cur¬ 
rently available. 

FLASH-COM is priced at $299 and 
interfaces with the U.S. Postal Service’s 
E-COM service. For more information 
about the package, write to Omni Com¬ 
puter Systems Inc., P.O. Box 162, 
Chestnut H ill, M A 02167; or call 1 -800- 
525-1055, (617) 277-2962 in Mass. 

Quick Type Speeds Typing 
On 100 

A program that speeds typing on the 
Model 100 and NEC PC-8201 A has 
recently been introduced by Pocketlnfo 
Corporation of Beaverton, OR. 

Quick Type lets users define abbrevia¬ 
tions one to three characters long for 
commonly used words, phrases, senten¬ 
ces and paragraphs, providing a per¬ 
sonal shorthand for users. The comput¬ 
er stores as many abbreviations as are 
needed, reducing the number of key¬ 
strokes necessary to type a document. 

After typing a document with the 
abbreviations, the user runs QuickType 
to expand the abbreviations into the 
correct full forms, producing a finished 
document for printing or transmission. 

(continued on Page 54) 
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BASIC in Bar Code 

B ar coded BASIC programs for the listed here, and this copy of your favor- scan the first line of code (suggestions 
Model 100 can save hours of ite magazine. for successful bar code reading follow), 

typing and correcting tedious Load B30F9. CO from the cassette The program name will be displayed on 
program listings. Here’s a refresher for tape provided with your bar code wand the screen and you will be asked to scan 
those who are now familiar with how following the instructions provided with the second line. If you lose your place, a 
this works and/or do not have the the tape. Now, carefully type this pro- quick glance at the screen will get you 
necessary PCM Bar Code Decoder gram into your Model 100 and save it as back on track. BA READ will make a 
program. “BAREAD." “beep"sound after a successful scan and 

You’ll need a bar code wand and It’s really very simple to use. When a “blip-bloop’’ sound if you scan the 
B30F9.C0 tape, the BASIC program it’s RUN, the program will ask you to wrong line. 



1230 

RETURN 


10 !iAXFILES = 2 

2000 

'*** READ BAR CODE *** 


30 RUNM"B30F9“ 

2010 

PL*="" 


100 CLS 

2020 

INPUT#1,S$:G0SUB 1000 


110 PRINT STRING$(40,"-") ; 

2030 

L7. = VAL (LEFT* (D* , 3) ) 


120 PRINT " PCM Bar Code Program De 

2040 

IF L7.-LC7.>1 THEN ER7. = 2:G0SUB 3000: G 

coder" 

0T0 

2020 


130 PRINT STRING*(40,) 

2050 

IF L7.-LC7.< 1 THEN ER7. = 3:G0SUB 3000: G 

140 OPEN "WAND:" FOR INPUT AS 1 

0T0 

2020 


150 PRINT@212,"Scan First Line" 

2060 

L C 7. = L 7. 


160 INPUT#1,S*:G0SUB 1000 

2070 

PRINT0280,STRING*!39,32) ; 


170 IF LEFT* (D*,3)<>"001" THEN ER7.=1: G0S 

2080 

PRINT0212, "Scan line "; LC7.+1; 


UB 3000:GOTO 160 

2090 

FOR 1=4 TO LEN(D*) 


180 FS*=MID*(D*,4,6) 

2100 

C*=MID*(D*, 1,1) 


190 OPEN FS* FOR OUTPUT AS 2 

2110 

IF C*=CHR*(13) AND RIGHT*(PL*,5 

) 

195 PRINT@212,STRING*<15,32); 

="DONE" THEN 2160 


200 PRINT@132,"Reading: "+FS* 

2120 

IF C*=CHR*(13) THEN PRINT#2,PL* 

• 

210 LC7.=1:PL*="":D*="001"+RIGHT*(D*,LEN< 

PL* = 

"".•GOTO 2140 


D*)-9):GOTO 2070 

2130 

PL*=PL*+C* 


1000 *** DECODE STRING *** 

2140 

NEXT I 


1010 D$="" 

2150 

GOTO 2020 


1020 FOR 1 = 1 TO LEN <S*) 

2160 

CLS:CLOSE:CALL 61807:MENU 


1030 SS* = M ID*(S* , 1,1) 

3000 

'*** ERROR CODES *** 


1040 IF SS$<>"*" THEN 1100 

3010 

SOUND 5000,10:SOUND 8000,10:SOUND 

5 

1050 SS*=MID*(S*,1+1,1) 

000 , 

10 


1060 SS*=CHR*(ASC(SS*)+32) 

3020 

IF ER7. = 1 THEN ER* = "You must scan li 

1070 1=1+1 

ne 1 

First!" 


1080 GOTO 1200 

3030 

IF ER7.=2 THEN ER*="You've SKIPPED 

a 

1100 IF SS*< THEN 1200 

line! " 


1110 SS*=MID*(S*,1+1,2) 

3040 

IP ER7.=3 THEN ER* = "You've ALREADY 

s 

1120 SS*=CHR*(VAL(SS*)) 

CANNED this line! " 


1130 1=1+2 

3050 

PRINTS280,STRING*(39,32); 


1200 D*=D*+SS* 

3060 

PRINT@280+(20-.5*LEN(ER*)),E R *; 


1220 NEXT I 

3070 

RETURN 
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Before scanning any of the bar code listings contained in this section 
into your Model 100’s memory, please be sure to carefully read the 
information on this page. 


Tips for Successful 
Bar Code Reading 

We are constantly working to 
improve the quality of the 
reproduction of PCM Bar Code.; 
however, some of you may 
experience problems due to 
minor flaws in the bar code. As 
you become more accustomed 
to using the bar code wand, 
most of your problems will dis¬ 
appear. The following tips 
should help you become a suc¬ 
cessful bar code reader. 

• Use an even, smooth speed. 

• Keep a constant angle to the 


code (slightly less than 90 °). 

• Use your arm to move the 
wand — not your wrist. 

• Use a straightedge such as a 
plastic ruler or an index card 
to guide your wand evenly 
across the code. A metal 
edge could damage your 
wand. 

• If you experience problems 
scanning a line, move your 
straightedge slightly up or 
down and try reading a dif¬ 
ferent part of the code — 
there may be flaws in the 
printing on the spot you’re 


trying to read. 

• Use a back-and-forth motion 
when a line does not read in 
on the first try. 

• Make sure that the tip of your 
bar code reader is free of 
dust. 

• Keep the LED on your bar 
code wand clean. 

• Use a piece of non-reflective 
plastic, such as the one pro¬ 
vided with your bar code 
wand, to protect the code 
from scratches. 


GRAF3D (FROM PAGE 30) 
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The Rackseller 


ALABAMA 

Birmingham 

Jefferson News Co. 

Florence 

Anderson News Co. 

Madison 

Madison Books 

ALASKA 

Fairbanks 

Fairbanks News Agency 

ARIZONA 

Phoenix 

Computer Pro 

Scottsdale 

Softwareland Corp. 

Tucson 

Anderson News Co. 

CALIFORNIA 

Citrus Heights 

Software Plus 

Gretna 

The Computer Supply Store 

Half Moon Bay 

Strawflower Electronics 

Livermore 

Software Galeria 

Lompoc 

L & H Electronics Emporium 

North 

Hollywood 

Levity Distributors 

San Francisco 

News on 24 

Sunnyvale 

Computer Literacy 

DELAWARE 

Wilmington 

Normar Inc.—The Smoke Shop 

FLORIDA 

Boca Raton 

Software, Software, Inc. 

Ft. Lauderdale 

Software Connection 

Miami 

Newsrack 

Panama City 

Computer Systems Group 

Pensacola 

Anderson News Co. 

Tallahassee 

Anderson News Co. 

GEORGIA 

Atlanta 

Guild News Agency 

Columbus 

Muscogee News Co. 

Trenton 

The Phone Line 

ILLINOIS 

Chicago 

Kroch's & Brentano's 

Jackson Street 

Kroch's & Brentano's 

Wabash Ave. 

Chicago 

Prairie News Agency 

Oakbrook 

Kroch's & Brentano's 


INDIANA 


Elkhart 

Elkhart City News & Book Store 

Indianapolis 

A—Computer Store 

Mishawaka 

Carrico's Radio Shack 

Scottsburg 

Radio Shack of Scottsburg 

IOWA 

Ames 

Myers TV & Stereo Repair 

Davenport 

Interstate Book Store 

KANSAS 

Wichita 

Amateur Radio Equipment Co. 
Lloyd's Radio 

LOUISIANA 

Slidell 

Radio Shack 

MAINE 

South Portland 

Portland News Co. 

MARYLAND 

Lexington Park 

Books, Etc. 

MASSACHUSETTS 

Littleton 

Computer Plus 

Marlboro 

Radio Shack 

MICHIGAN 

Rochester 

Rochester Book Center 

Sterling Heights 

Software City 

Programs, Inc. 

Wyoming 

Gerry's Book Co. 

NEBRASKA 

Lincoln 

Hobby Town 

NEW HAMPSHIRE 

Manchester 

Brookwrights 

Petersborough 

WBR Electronics-Radio Shack 

West Lebanon 

Verham News Corp. 

NEW JERSEY 

Hackensack 

Total Circulation Service 

Marmora 

Outpost Radio Shack 

Pennsville 

Dave's Electronic Radio Shack 

NEW MEXICO 

Albuquerque 

News and Bookstore 

Page One Newsstand 


NORTH CAROLINA 

Cary It's Just For You, Inc. 

Raleigh Softmart 

NORTH DAKOTA 


Fargo 

OHIO 

Cincinnati 

Toledo 


Computer Associates 

Cinsoft 

Leo's 


PENNSYLVANIA 

Pleasant Hills Pittsburgh Computer Store 

RHODE ISLAND 

Newport Kelly's Variety 

SOUTH CAROLINA 

Greenville Palmetto News Co. 

North 

Charleston The Green Dragon 

TENNESSEE 


Knoxville 

Memphis 

Nashville 

Smyrna 


Anderson News Co. 
Computer Center 
Mosko's Book Store 
Delker Electronics, Inc. 


TEXAS 

Dallas 
Ft. Worth 


Irving 

VIRGINIA 

Norfolk 

WASHINGTON 

Kennewick 

Richland 


Micro Concepts, Inc. 

A & A International 
Byteworks, Inc. 

RFI Electronics 
Software Access 

1-0 Computers 

Satellite TV Specialists 
C & J Electronics Computer Center 


CANADA 

ALBERTA 

Calgary Rainbow Software Services 

Edmonton Kelly's Software Distributors 

NOVA SCOTIA 

Halifax Atlantic News 


Also available at selected B.Dalton Bookseller stores in the United States and Canada. 


Users can create abbreviations while 
typing, and define and expand them 
later. 

Quick Type , which sells for $29.95, is 
available on cassette tape, and comes 
with a user manual. For further infor¬ 
mation, contact Pocketlnfo Corp., P.O. 
Box 152, Beaverton, OR 97075, (503)’ 
649-8145. 

Lotus 1-2-3 Available For 
The 2000 

The Lotus 1-2-3 integrated software 
system is now available for the Model 
2000. It’s carried by Radio Shack 
Computer Centers and participating 
dealers (Catalog Number 26-5300, sug¬ 
gested retail price $495). 

Unlike versions of 1-2-3 for other 
computers, the Tandy 2000 program 
includes the MS-DOS operating sys¬ 
tem. There is no need to purchase MS- 
DOS separately at additional cost, and 
no “installation procedure” is required 
of the user. 


The 2000’s graphics allows 1-2-3 to 
use color in the text mode for highlight¬ 
ing in the “help” screens which the user 
may call up at any time there is a ques¬ 
tion regarding how to perform a func¬ 
tion. 

Lotus 1-2-3 includes a spreadsheet 
function capable of up to 2,048 rows of 
256 columns, using all available mem¬ 
ory. It features advanced cell and page 
formatting options, and statistical, fi¬ 
nancial, and calendar functions. Infor¬ 
mation from the spreadhseet can be 
used to create graphs, taking advantage 
of the Tandy 2000’s high-resolution 
640x400 monochrome and color graph¬ 
ics options. Bar and line graphs, pie 
charts, stacked bar charts, and X-Y 
graphs are available. 

Graphs can be displayed on the screen 
in about two seconds, and may be 
printed using PrintGraph , a utility 
supplied with the program. 

Lotus 1-2-3 requires at least 256K 
RAM, and may be used with the VM-1 
High Resolution Monochrome Moni¬ 


tor (26-51 11) with optional High Reso¬ 
lution Monochrome Graphics (26-5140), 
or the CM-1 Color Monitor (26-5112) 
with color graphics options. 

New Portable Disk Drive 
For PoCo 

Holmes Engineering Inc. of Murray, 
Utah, has released the Chipmunk™ — a 
3^-inch portable disk drive for the 
Model 100. The Chipmunk comes ready 
to plug into your PoCo with no soft¬ 
ware installation required. Disk BASIC 
and a menu driven operating system are 
included. Power is provided by built-in 
rechargeable batteries or an AC adap¬ 
ter. Because of the small size of the 
Chipmunk, it can fit into a briefcase, 
along with the Model 100. Additional 
drives may be plugged into the Chip¬ 
munk to increase storage capacity. The 
Chipmunk with connecting cables, 
manuals and disk, retails for less than 
$550. Contact Holmes Engineering, 5175 
Greenpine Drive, Murray, UT 84123, 
(801) 261-5652. 
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is the stuff computer programs are made of. And now, 
Traveling Software has figured out a way to make your three pound 
lap-size computer do what only the big boys could do before. 

Introducing T-base, the most powerful data base management 
system ever written for your TRS-80 Model 100, NEC PC-8201 or 
Olivetti M10. 

T-base, a sort of place-for-everything-and-everything-in-its-place 
organizer, that allows you to keep multiple files of information or 
forms. But unlike simple filer programs, T-base is a relational data 
base manager. This allows you to borrow information that relates to 
one file from data contained in another. The net result is you can 
store more data by eliminating the unnecessary . And 

because T-base can link one file to another you have the ability to 
look at your data in a number of different ways. T-base also allows for 
the creation of custom printed or LCD display reports. 

T-base has spreadsheet capabilities too! T-base allows you to 
build in your own formulas on your forms with automatic recalcula¬ 
tions when anv of vour variables change. 


T-base is easy. As with all Traveling Software programs, you not 
only get printed instruction, but you’ll get an audio cassette with step- 
by-step prompting from the “Traveling Professor”. 

Simply put, T-base is the most important software ever written 
for your notebook computer. And because of its condensed format 
and broad data capabilities, your 3 pound package can do more than 
even you probably expect. T-base—it beats the ?•&!£!* out of the 
competition. 

Special Introductory Price $79.95 —Save $20 through June 30. 

Call now for the dealer nearest you. 

Traveling Software, Inc. 

11050 Fifth Avenue N.E. 

Seattle, W r A 98125 

1-800-343-8080 

Look for Traveling Software available for other lap-sized computers. 



Traveling Software is now available in all Radio Shack stores via EXPRESS ORDER! 





















First Time Ever! Powerful Minicomputer 
Accounting Software Available on a Micro. 



Ready-to-Run On the Incredible Tandy TRS-80® Model 2000 


Our MAI/Basic Four accounting 
software is just what small busi¬ 
nesses have been waiting for. Be¬ 
cause it is quite simply the best ac¬ 
counting solution available today. 
Combined with our state-of-the-art 
Tandy 2000 Personal Computer, 
MAI/Basic Four programs will add 
power, flexibility and efficiency to 
every facet of your company’s ac¬ 
counting procedures—general 
ledger, accounts payable, accounts 
receivable and much more. Since 


MAI/Basic Four software was origi¬ 
nally designed for minicomputers, 
it’s already been proven in thou¬ 
sands of businesses worldwide. All 
the programs are fully integrated, 
so you only have to enter data 
once. You can easily tailor the sys¬ 
tem to meet your special account¬ 
ing needs. And the documentation 
is extremely clear and straightfor¬ 
ward, so there’s no previous com¬ 
puter experience required, Get a 
demonstration of the Tandy 2000 


and MAI/Basic Four software today. 
Tandy 2000 systems start at $2999, 
or only $105 per month* on our 
commercial lease. Come see your 
accounting solution today! 

Available at over 1200 
Radio Shack Computer Centers and at 
participating Radio Shack stores and dealers. 

Radio /hack 

COMPUTER CENTERS 

A DIVISION OF TANOV CORPORATION 


'Plus applicable use/sales tax. Prices apply at Radio Shack Computer Cenlers and participating Radio Shack siores end dealers, MAI/Basic Four is a trademark of Management Assistance, Inc. 
























PCM — The Magazine For 
Professional Computing Management. 


We have added the TANDY 2000 to our 
pages as the home-base computer best suited, 
we feel, to augment the power and versatility 
of the Model 100. With the Model 2000 in the 
office or at home and the MI00 “on the 
road/'you will havean unbeatable tandem of 
Tandys working lor youl 

And if that isn't enough to pique your 
interest, PCM is announcing a new monthly 
feature — bar code listings of BASIC pro¬ 
grams! Ready-to-load software right from 
our pages! 

And, to accommodate these innovative 
additions to PCM, we are increasing the 
number of pages you will receive with each 
issue. 

All this, along with our regular host of 
articles and program listings for business and 
professional use or just plain fun. 

Subscribe to PCM today — you'll find it's 
worth more than ever! 


PCM 



The Magazine For 

Professional Computing Management 

□ YES! Please send me a one year (12 issue) 
subscription to PCM for only $28*, A savings of 
22% off the newsstand price* 

Name 
Address 
City 

□ Charge my subscription to my: □ VISA, □ MC, □ AE card 

Acct. # __Interbank # (MC only). 

Signature 


'Canadian and Mexican subscribers adcMJ 5. S/Surface rate elsewhere U S. $64 
Air mail US- $65. Allow 5-6 weeks for firs! copy. 
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